Top 10k strings from Utility Compilation 17 (19xx)(-).trd
in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Utilities & Educational - [TRD] (TOSEC-v2007-01-01) /
Back to the directory listing
68 .{Mode 6}{TextAttr 14} 58 {TextAttr OFF} 54 ! 50 46 {TextAttr 13} 20 Print " 16 TextAttr OFF 14 Add B 1 12 10 {TextAttr 14} 10 (Y0+DY*MM-1 10 Random B 8 KeyPress B 8 ClSpc E 8 Add E 8 8 . . . 8 6 {TextAttr 12} 6 {TextAttr 11} 6 {TextAttr 11} 6 {Mode 6}{TextAttr 14} 6 PPPPPPPPPPP 6 :num>{Mode 8}{TextAttr OFF} 6 :num>]{Mode 8}{TextAttr OFF} 6 PRESENTATION MASTER. 6 PRESENTATION MASTER 6 (KLAWI[I 6 Sub D B 6 Sub C B 6 Locate var A B 6 (TEPERX 6 Click 6 Print " 6 pRISWOITX PEREMENNOJ 6 NSP 6 . . . 6 Print 6 208 6 ! 6 6 6 4 {TextAttr OFF} 4 {TextAttr OFF} 4 {TextAttr 13} 4 {TextAttr 11} 4 zAPISATX ILL@STRACI@ 4 zAGRUZITX KOMPAKT 4 zAGRUZITX FAJL 4 sOZDATX ILL@STRACI@ 4 perewod9~isel9iz9 4 iNFORMACIQ 4 fAJL NE NAJDEN 4 TextAttr 7 4 TextAttr 4 4 TextAttr 14 4 Swobodno>>>>> 4 Stertyh>>>>>>>> 4 ScrView "demo1s" 4 Print " 4 Pause 0 key 4 PPPPP\@\PPP 4 PM-ILLUSTRATOR 4 GoTo BEGIN 4 Fajlow>>>>>>>>> 4 CONVER Comander 4 @=Kowalewskij 4 <fff<<fff< 4 :{TextAttr 14} 4 :{Mode 6}{TextAttr 14} 4 :str>{Mode 8}{TextAttr OFF} 4 40000000000 4 2>] ...{Mode 8}{TextAttr OFF} 4 .(3412)76-19-13" 4 ).{Mode 6}{TextAttr 14} 4 (((/((((((/ ? 4 (((((/ /((( 4 ((((((((((( 4 ").{Mode 6}{TextAttr 14} 4 not C="y" ) 4 TEXTVIEW 4 PRESENTATION 4 <var>. 4 TextOutSpace C B C D 4 TextOutSpace B D C D 4 TextOutSpace B B C B 4 TextOutSpace B B B D 4 TextAttr B 4 Sub C 1 4 Sub B 1 4 Set var A 50 4 Set D 22 4 Set C 30 4 Set B 6 4 Set B 19 4 Random var A 4 Pause 45 key 4 PRESENTATION MASTER 4 Mul B 256 4 Locate 7 B 4 If B<12 4 Add var A B 4 Add D 1 4 Add C 1 4 Add A 1 4 Written by Hanzis Sergey 4 Set A 20 4 Print " 4 GoTo m8 4 < < PPP\PPPPPP\@| 4 < 4 TextAttr OFF 4 Sound ON 4 Set A 20 4 Print 4 PUTPIC 4 EndIf 4 Else 4 Alt 4 ASCII 4 < 4 / 4 " 4 [< 4 l@BIMAQ IGRA aLEKSEQ - 4 ! 4 4 4 2 ~ernyj sinij krasnyj fioletowyjzelenyj goluboj veltyj belyj ! 2 ~astx9fajla9 2 }@}@}@}@}@}@}@ 2 {TextAttr OFF}{PutPic "demo1i" 0} 2 {TextAttr OFF}>). 2 {TextAttr OFF} - 2 {TextAttr 47} 2 {TextAttr 46} 2 {TextAttr 44} 2 {TextAttr 42} 2 {TextAttr 40} 2 {TextAttr 14}var var R{TextAttr OFF} - 2 {TextAttr 14}var S{TextAttr OFF}. 2 {TextAttr 14}var 1{TextAttr OFF} - B, 2 {TextAttr 14}var 0{TextAttr OFF} 2 {TextAttr 14}T{TextAttr OFF}. 2 {TextAttr 14}Command ON|OFF{TextAttr OFF} - 2 {TextAttr 14} PRESENTATION MASTER{TextAttr OFF} 2 {TextAttr 14} TEXTATTR{TextAttr OFF} - 2 {TextAttr 14} PUTPIC {TextAttr OFF} - 2 {TextAttr 14} MODE {TextAttr OFF} - 2 {TextAttr 13}{Mode 6} 2 {TextAttr 13}R (Retry){TextAttr OFF} - 2 {TextAttr 13}I (Ignore){TextAttr OFF} - 2 {TextAttr 13}A (Abort){TextAttr OFF} - 2 {TextAttr 13}129{TextAttr OFF} - 2 {TextAttr 13} WINDOW <x:num> <y:num> < 2 {TextAttr 13} VAL <var> <str>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} UPCASE <vstr>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} TEXTVIEW < 2 {TextAttr 13} TEXTOUTSPACE <x1:num> <y1:num> 2 {TextAttr 13} TEXTATTR OFF|< 2 {TextAttr 13} SUB <vnum> <num>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} SPRVIEW < 2 {TextAttr 13} SOUND ON|OFF{Mode 8}{TextAttr OFF} 2 {TextAttr 13} SCRVIEW < 2 {TextAttr 13} SCROLL UP|DOWN{Mode 8}{TextAttr OFF} 2 {TextAttr 13} READNUM <var>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} READ <var>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} RANDOM <vnum>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} QUIT{Mode 8}{TextAttr OFF} 2 {TextAttr 13} PUTPIC < 2 {TextAttr 13} PRINT [<num1>|<str1>] [<num2>| 2 {TextAttr 13} PAUSE [< 2 {TextAttr 13} ON <num> GOTO < 2 {TextAttr 13} NSP{Mode 8}{TextAttr OFF} 2 {TextAttr 13} MUL <vnum> <num>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} MODE <num>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} LOCATE <x:num> <y:num> 2 {TextAttr 13} LINELEN <num>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} KEYPRESS <var>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} KEY UP|DOWN|LEFT|RIGHT|FIRE|HOME| 2 {TextAttr 13} IF [NOT] <str1> = <str2> 2 {TextAttr 13} GRAPHOUTSPACE <x1:num> <y1:num> 2 {TextAttr 13} GOTO < 2 {TextAttr 13} ERROR ON|OFF{Mode 8}{TextAttr OFF} 2 {TextAttr 13} END{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ENDIF{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ELSE{Mode 8}{TextAttr OFF} 2 {TextAttr 13} DRUM{Mode 8}{TextAttr OFF} 2 {TextAttr 13} DIV <vnum> <num>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} DELWIN{Mode 8}{TextAttr OFF} 2 {TextAttr 13} DELBAR{Mode 8}{TextAttr OFF} 2 {TextAttr 13} CODE <var> <str>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} CLSPC [< 2 {TextAttr 13} CLS [< 2 {TextAttr 13} CLICK{Mode 8}{TextAttr OFF} 2 {TextAttr 13} CHAIN < 2 {TextAttr 13} BREAK ON|OFF{Mode 8}{TextAttr OFF} 2 {TextAttr 13} BORDER < 2 {TextAttr 13} BEEP{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ASK <var>{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ASCII{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ALT{Mode 8}{TextAttr OFF} 2 {TextAttr 13} ADD <vnum> <num> 2 {TextAttr 13} : 2 {TextAttr 13} 2 {TextAttr 13} 2 {TextAttr 13} 2 {TextAttr 12}boot{TextAttr OFF} - 2 {TextAttr 11} 2 {TextAttr 11} 2 {TextAttr 11} 2 {TextAttr 11} 2 {TextAttr 10} 2 {PutPic "demoi1" 0} 2 {Mode 6}{TextAttr 13} 2 {995533{h@ 2 zapisatx9sektor 2 zapisatx9dorovku 2 z@z@z@z@z@z@z@ 2 yAx x x@x@x`x`x 2 y1 - 0..23, x2 - x1..31, y2 - 2 y y@y@y`y`y 2 y y y@y`y`y 2 xbYShrdZlZlj\jTZl 2 x@0@H H?x`x 2 wyhod 2 wY DEJSTWITELXNO HOTITE 2 wERSIQ 1.0 (08.1995) 2 utPic "demo1i" 0}{Mode 8}{TextAttr OFF} 2 tREBUETSQ PEREMENNAQ 2 tREBUETSQ PARAMETR 2 tREBUETSQ KOMANDA 2 s~itatx9dorovku 2 stro~n=9bukwy 2 sobstwennye 2 snowa dalx{e 2 sistemnoj9dorovke 2 sektorow>> 2 sNA^ALA ZADA@TSQ CWETA ILL@STRACII. 2 sLI[KOM DLINNAQ STROKA 2 sISTEMNAQ O[IBKA 2 sINTAKSI^ESKAQ O[IBKA 2 sBOJ DISKA TREK 2 preduprevdenie: T.K. ILL@STRACIQ 2 podtwerdite9 2 perezapisatx 2 pROGRAMMA OKON^ENA. 2 pEREPISATX? 2 pARAMETR NE NA MESTE 2 o[IBKA W ZAPISI ^ISLA 2 oPERACIQ OTMENENA 2 oKNO NE OTKRYTO 2 nowye_dorovka 2 najti9fajl 2 nE^ISLOWAQ PEREMENNAQ 2 nET RAMKI NA \KRANE 2 nET DISKA W DISKOWODE! 2 nESOWMESTIMYE PEREMENNYE 2 nEOPREDELENNAQ PEREMENNAQ 2 nEDOPUSTIMYJ SPECIFIKATOR 2 nEDOPUSTIMYJ PARAMETR 2 nAVATA KLAWI[A 2 monohrom 2 mETKA NE NAJDENA 2 mALO PAMQTI 2 lI[NIJ PARAMETR 2 kIkiWSUSkIkiWSUSkIkiWSUSkIkiWSUSkIkiWSUSkIkiWS 2 ill`straciq 2 iZOBRAVENIE NE ZAGRUVENO 2 iMQ FAJLA: 2 iLL@STRACIQ NE SOZDANA 2 iLL@STRACIQ 2 iLL@STRACII WYREZA@TSQ IZ 2 iDET ZAGRUZKA... 2 hRhbUk\flZ|jPjt 2 fAJL UVE ESTX. 2 extAttr 14}BUMPY.{Mode 8} 2 extAttr 130} 2 eSLI WYBRANY CWETA sobstwennye, TO 2 dISK ZA]I]EN 2 aWTOR: hANCIS sERGEJ 2 _zamena9diska 2 _wwod9komand 2 _wozwrat9w9 2 _stranica9wpered 2 _stranica9nazad 2 _perekl`~enie9zagl= 2 _perekl`~enie9revimow9 2 _informaciq 2 ^islo9NE9bolx{e 2 ^EK). pOSLE \TOGO wAM BUDET SOOB]ENA 2 [ENIE PEREZAPISI. pRI PEREZAPISI, 2 Zapustitx9fajl 2 Zapisatx9izmeneniq 2 Zapisatx9dorovku 2 Zapisatx99sektor 2 ZU@TSQ KLAWI[I: 2 ZU DLQ WSEJ ILL@STRACII. tAKIM OBRA- 2 ZOM, FAJL POLU^AETSQ PRIMERNO NA 12% 2 ZAPOMINAETSQ. pROCEDURA DEKOMPRESSII 2 ZAGRUZQTSQ PERWYE 6912 BAJT; ESLI 2 Wyjti9iz9procedury 2 Wy9uwereny9 2 Wstawxte99prinima`}ij9dis 2 Wstawxte99kopiruemyj99dis 2 Window 9 7 14 12 15 top shade store 2 Window 8 3 19 5 23 top store 2 Window 6 3 20 15 32 top shade 2 Window 6 17 20 3 24 shade 2 Window 5 9 21 9 41 shade store 2 Window 4 10 23 6 23 shade store 2 Window 2 6 28 3 15 2 Window 2 11 8 4 32 shade 2 Window 19 9 11 11 56 top shade store 2 Window 12 11 8 4 56 top shade 2 Window 1 1 30 8 15 2 Window 0 6 32 14 41 2 Window 0 0 32 3 6 store 2 WYREZANIE ILL@STRACII IZ KARTINKI. 2 WYREZANI@ ILL@STRACII. pEREKRESTIEM 2 WWEDITE IMQ ZAGRUVAEMOGO FAJLA. eSLI 2 WOOB]E NE WKL@^A@TSQ W ILL@STRACI@ - 2 W GLAWNOM MEN@. eSTESTWENNO, 2 W TEKST KOMANDOJ rm-INTERPRETATORA 2 V 3.03R 512K 2 V 3.03R 48K 2 USkIkiWSUSkIkiWSU 2 UKAZANNYJ FAJL DLINNEE \KRANNOGO, 2 UKAVITE LEWYJ WERHNIJ UGOL FRAGMEN- 2 TextView "demodoc6" 2 TextView "demodoc5" 2 TextView "demodoc4" 2 TextView "demodoc3" 2 TextView "demodoc2" 2 TextView "demodoc1" 2 TextView "demo1t" 2 TextOutSpace 9 7 9 7 ( 2 TextOutSpace 5 2 31 23 2 TextOutSpace 12 11 12 11 ( 2 TextOutSpace 0 6 31 19 2 TextOutSpace 0 4 31 23 2 TextOutSpace 0 0 31 23) 2 TextAttr 6 2 TextAttr 43 2 TextAttr 3 2 TextAttr 13 2 TextAttr 12 2 TION MASTER{TextAttr OFF} 2 TEXTVIEW ( 2 TEXTVIEW 2 TEXTOUTSPACE, GRAPHOUTSPACE, 2 TEXTATTR, {TextAttr 12} 2 TATION MASTER. 2 TATION MASTER. 2 TATION MASTER 2 TANOWLENY ORIGINALXNYE ATRIBUTY, A W 2 TA, A ZATEM USTANOWITE TREBUEMYJ 2 T.(3412)76-19-13 2 S~itatx99dorovku 2 Sure Copy ?$ < Y/N >$ 2 Steretx9mark 2 SkIkiWSUSkIkiWSUSkIkiWSTRj)* 2 Set N "Bs" 2 Set N "As" 2 Set N "9s" 2 Set N "8s" 2 Set N "7s" 2 Set N "6s" 2 Set N "5s" 2 Set N "4s" 2 Set N "3s" 2 Set N "2s" 2 Set M "demo" ( 2 Set F 65535 (-1) 2 ScrView M compressed ( 2 SPECIALXNOGO GRAFI^ESKOGO FORMATA 2 SPACE,ENTER,0 2 SOZDANNOGO W L@BOM GRAFI^ESKOM RE- 2 SOSTAW PAKETA 2 SNA^ALA ZAPRA[IWAETSQ PODTWERVDENIE 2 S=_Peterburg 2 S$=" " 2 RESA. pOSLE \TOGO SODERVIMOE \KRANA 2 READ, READNUM, MENU, 2 RAZMER OKNA (U^TITE, ^TO KOORDINATY 2 RAN I ATRIBUTY USTANOWLENY, WYBERITE 2 QSFTFOUBUJPO!NBTUFS 2 Print "PRESENTATION MASTER" 2 Print "426063, 2 Print "19- 2 Print "121019, 2 Print " 426063, 2 Print " PRESENTATION MASTER." 2 Print " 2 Print " 2 Print " 2 Perwaq9swobodnaq9dorovka>> 2 Pereme}enie9kursora_klawi{ami9kursora 2 Pereimenowat 2 Pause 500 key 2 Pause 400 key 2 Pause 2000 key 2 Pause 1 key ( 2 PUNKT gOTOW! W MEN@ I PRISTUPAJTE K 2 PRQMO NA OSWOBODIW[EESQ MESTO. 2 PROSTO UKAZYWAETSQ ODIN ATRIBUT SRA- 2 PROGRAMMA SAMA USTANOWIT MONOHROMNYJ 2 PRESENTATION MASTER - ILLUSTRATOR 2 PRESENTATION MASTER 2 PRESENTATION 2 PREDYDU]EJ KOMANDY ILL@STRACII NA 2 PREDNAZNA^ENA DLQ SOZDANIQ FAJLOW 2 PPPPPX@XPPP 2 PM-LAN - 2 PAMQTI USTANOWLENY POSTOQNNYE 2 On F GoTo r0 r1 r2 r3 r4 r5 r6 r7 r8 r9 2 On B GoTo m3 m2 m3 2 On A GoTo exit p1 p2 p3 p4 p5 p6 exit 2 On A GoTo exit demo info man setup exit 2 Ob?em9fajla9iz 2 OTME^ENNOM FRAGMENTE ONI ODINAKOWYE, 2 OSTATOK RANEE ZAGRUVENNOGO IZOBRAVE- 2 OKNA ZADA@TSQ S DISKRETNOSTX@ 8 TO- 2 OFF ON A B C D E F G H I J K L M N O P Q R S T U V W X Y Z SET KEY RIGHT LEFT DOWN UP FIRE HOME END QUIT RANDOM CLS CLSPC BORDER TEXTATTR MODE WINDOW DELWIN TEXTOUTSPACE GRAPHOUTSPACE MENU DELBAR TEXTVIEW SCRVIEW SPRVIEW PRINT NSP ASK READ LINELEN ASCII ALT LOCATE IF ELSE ENDIF NOT GOTO VAR ADD SUB CODE CLICK BEEP DRUM SCROLL SOUND BREAK ERROR PAUSE SHADE STORE TOP COMPRESSED GIRD READNUM VAL KEYPRESS UPCASE CHAIN MUL DIV PUTPIC 2 OBY^NOGO GRAFI^ESKOGO IZOBRAVENIQ, 2 O9[9I9B9K9 2 Nowaq9mask 2 Nesankcionirowannaq99kopi 2 Ne9TOT9disk99 2 Na~alo_dor= 2 Na9diske9NET9takogo9fajla 2 NYJ FAJL S^ITYWAETSQ W SPECIALXNYJ 2 NOGO FAJLA IMEET RAS[IRENIE <r>. eS- 2 NETESX W GLAWNOE MEN@. 2 NAVMITE L@BU@ KLAWI[U 2 NALA, W PROTIWNOM SLU^AE ATRIBUTY 2 Mnogo9sektoro 2 Mnogo9fajlo 2 Menu B 6 14 4 21 14 4 2 Menu A 9 9 14 9 11 14 9 13 14 9 15 14 9 17 14 2 Menu A 6 5 20 6 7 20 6 9 20 6 11 20 6 13 20 6 15 20 6 18 20 2 Mark=9fajlow 2 MONOHROMNAQ, W CELQH \KONOMII 2 MOGO FAJLA, TO ZAPISX PROIZWODITSQ 2 MM=NO*(MM<1 2 Locate 7 1 3 2 Locate 3 3 2 Locate 22 3 3 2 Locate 2 0 3 2 Locate 0 1 3 2 LineLen 25 2 LINELEN. 2 LI FAJL S TAKIM IMENEM UVE ESTX NA 2 LA RAWNA SEKTORNOJ DLINE ZAPISYWAE- 2 Kopirowatx9s9 2 Kontrolx9diskow9 2 Konec9_dor= 2 Key up \E ( 2 Key right \D (var 3) 2 Key quit \J 2 Key left \C (var 2) 2 Key home \H 2 Key fire \G 2 Key end \I 2 Key down \F 2 KORO^E - EGO SODERVIMOE NALOVITSQ NA 2 KOMPAKTNEE. pRI \TOM, DAVE ESLI US- 2 KI. pRI WYBORE \TOJ KOMANDY UKAZAN- 2 KEY, BORDER, TEXTATTR, MODE, 2 If not A=0 2 IZMENQTX SODERVIMOE PAMQTI (KROME 2 ISKRA-SOFT91 2 ILLUSTRATOR{TextAttr OFF} 2 GraphOutSpace 0 6 31 19 2 GoTo earth 2 GoTo ReStart 2 GoTo ReSet A 1 2 GoTo Earth 2 GoTo EaRet 2 File Exists$OverWrite ?$ < Y/N >$ 2 Fajlow>>>>> 2 Fajl99su}estwuet 2 FORMACII SM. OPISANIE 2 FAJLA> NA \KRAN. wY- 2 ESLI SEKTORNAQ DLINA UDALQEMOGO FAJ- 2 Dlinna999fajla>> 2 Disk-Doctor 2 Disk error 2 Destination$ Disk$ 2 DY wY SEJ^AS I NABL@DAETE. 2 DRIVE-2, SUPER NINTENDO 2 DOLVNA BYTX PEREME]AEMOJ I NE DOLVNA 2 DLINA POLU^IW[EGOSQ FAJLA I wY WER- 2 DISKE, BUDET WYDAN ZAPROS NA RAZRE- 2 DISK W UKAZANNYJ FAJL. iMQ POLU^EN- 2 Command OFF . 2 ClSpc 41 ( 2 ClSpc 0 ( 2 ClS 7 gird 2 Chain "autoexec" 2 Chain "Manual" 2 CS/Q,CS/7 2 CS/A,CS/6 2 CS/1,CS/SS 2 COMPRESSED 2 BUFER I ZAPUSKAETSQ S NA^ALXNOGO AD- 2 BREAK. Press any key to reset 2 BREAK, ERROR, 2 Ax@x x`x@x 2 Adres9zagruzki>> 2 Add M N ( 2 ATRIBUTY BERUTSQ IZ KARTINKI-ORIGI- 2 ALT/ASCII, LINELEN, SOUND, 2 A ===>$ Copy$ 2 ?@OPWPWPWPWPO@@@@? 2 >{Mode 8}{TextAttr OFF} 2 >] [-"-] [-"-]{Mode 8}{TextAttr OFF} 2 >] [-"-] [-"-] 2 =*]\##"]\>o2 2 ="priwet polxzowatelqm 2 < 2 :{Mode 5}{TextAttr 14} 2 :str>{TextAttr OFF}; 2 :str> <x:num> <y:num> 2 :str> <x:num> 2 :num>]|[COMPRESSED]{Mode 8}{TextAttr OFF} 2 :num>]|[COMPRESSED] 2 :num>] [GIRD]{Mode 8}{TextAttr OFF} 2 :num>] [GIRD] 2 :num> [KEY]]{Mode 8}{TextAttr OFF} 2 :num> [KEY]] 2 :num> [<x2> <y2> 2 :num> <x:num> <y:num> 2 :num> <x:num> 2 :Clr ( 2 :BEGIN ( >>>>>>> 2 : {TextAttr 14}[<num>]{TextAttr OFF}; 2 : {TextAttr 14}Command <str> [Key]{TextAttr OFF}; 2 : {TextAttr 14}Command < 2 : {TextAttr 14}={TextAttr OFF} - 2 : x1,y1 - 2 : disk not present 2 : Command ON 2 9zapisatx99katalog 2 9stertyh>>> 2 9prerwatx9operaci 2 9ignorirowatx9fajl 2 9Konec9programmy9 2 9@=Kowalewskij 2 999swobodnoj9zone 2 8 2 7.{Mode 6}{TextAttr 14} 2 62893,2643 2 426063 G.iVEWSK, UL.wOSTO^NAQ, 36-68 2 256128 48: 2 23 * 24 * 2 21 fORM! 1 12 - - 22 * 2 1:num> [<x2> <y2> 2 19 * 20 1/6'' 2 27 50 - 2 17 * 18 * 2 15 * 16 * 2 13 * 14 * 2 11 dWOJ+ 2 27 71 - 12 dWOJ- 2 27 72 - 2 0000000000000000000000000000000000000000000000000000000000000000000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((000000000000000000((((((((((((((00000000000000000000000000000000000000000000000000000000000000000000000000 00 000000000000000000000000000000000 2 000000000000000000000000000000000000000000 2 000000000000000000000000000000000 2 /,TextOutSpace 0 0 31 23 2 /, Locate 0 0 2 .{TextAttr 14} 2 ... {TextAttr OFF}{PutPic "demo1i" 1} 2 .(3412)76-19-13 2 . wYRAVENIE 2 -FAJLOW. zDESX NET NI FUNKCIJ, NI PROCEDUR - TOLXKO 2 ---------- 2 ,{TextAttr 14} 2 , {TextAttr 14}KeyPress{TextAttr OFF} 2 , {TextAttr 14}>{TextAttr OFF} - 2 , {TextAttr 13}128{TextAttr OFF} - 2 , ^TO SOOTWETSTWUET WARIANTAM: 2 , 36 - 68" 2 , 20.08.1995 ) 2 , {TextAttr 14}<{TextAttr OFF} - 2 , SEKTOR 2 , 2. 19- 2 , ) 2 +F+N+V+^"( 2 ++++++++++ 2 *** Copy End ***$ 2 *(VRTSkIkiWSU( 2 ){TextAttr OFF}{PutPic "demo2i" 8} 2 ){Mode 8}{TextAttr OFF} 2 ). "SPECTROFON" 2 ). SHADE 2 ),X0-DX;S$ 2 ) 2 ({TextAttr 14}PM{TextAttr OFF}). 2 ({TextAttr 12}PMI{TextAttr OFF}). 2 (Y0+DY*M-1 2 (MONOHRMONYE) ATRIBUTY. 2 (ILL@STRACIJ), PRIGODNYH DLQ WSTAWKI 2 ( x@x@xHx@x 2 ( 2 'autoexec" 2 'True Vid.' 2 'Inv. Vid.' 2 'Graphics' 2 'Caps Losk' 2 'CONVER-Utility' & Y.Kovalevsky 2 #"a\"c\"e\! 2 "{Mode 8}{TextAttr OFF} 2 "S\"K\"U\#"Y\ 2 "PM 1.0","PMI 1.0","CONVER","READ ME" 2 ".{Mode 6}{TextAttr 14} 2 " "ZX Spectrum" 2 !xFSTJR!2/1!)19/2::6* 2 !bXUPS;!iBODJT!tFSHFK 2 !VM/xPTUP_OBR-!47.79 2 !U/)4523*87.2:.24 2 !537174-!H/jWFXTL- 2 !!OBWNJUF!MACVA!LMBXJ\V 2 !!!oFU!GBKMB!! 2 |TOGO VE \FFEKTA MOVNO 2 {TextAttr OFF} 2 {TextAttr 42}PM-ILLUSTRATOR{TextAttr OFF}. 2 {TextAttr 40} 2 {TextAttr 29} 2 {TextAttr 14}t{TextAttr OFF}, {TextAttr 14}CS/T{TextAttr OFF} - 2 {TextAttr 14}keypress{TextAttr OFF}. 2 {TextAttr 14}RANDOM{TextAttr OFF}). 2 {TextAttr 14}Pause Key{TextAttr OFF}. 2 {TextAttr 14}KEYPRESS{TextAttr OFF} 2 {TextAttr 14}BUMPY{TextAttr OFF}. 2 {TextAttr 14}ASCII{TextAttr OFF} ( 2 {TextAttr 14}ALT{TextAttr OFF} 2 {TextAttr 14} PM-LAN {TextAttr OFF}- 2 {TextAttr 14} 2 {TextAttr 13}Z{TextAttr OFF} ( 2 {TextAttr 13}VAR{TextAttr OFF}. 2 {TextAttr 13}A{TextAttr OFF}, {TextAttr 13}R{TextAttr OFF}, {TextAttr 13}I{TextAttr OFF}, 2 {TextAttr 13}14{TextAttr OFF}). 2 {TextAttr 13}14{TextAttr OFF} ( 2 {TextAttr 13}13{TextAttr OFF}), 2 {TextAttr 13}13/10{TextAttr OFF} ( 2 {TextAttr 13} 2 {TextAttr 12}PM-ILLUSTRATOR{TextAttr OFF} 2 {TextAttr 12}PM- 2 {TextAttr 12}PM 1.0{TextAttr OFF}, {TextAttr 12}autoexec{TextAttr OFF} 2 {TextAttr 12}0..65535{TextAttr OFF}, 2 {TextAttr 12} 2 {TextAttr 11}24{TextAttr OFF}, 2 zAPISX SO- 2 zAGRUZKA \KRAN- 2 zAGRUZKA ZA- 2 x1 - 0..31, y1 - 0..23, x2 - x1..31, y2 - y1..23. 2 x1 - 0..31, 2 wYWOD NA \KRAN INST- 2 wYWOD NA \KRAN POLNOGO 2 wYHOD IZ PROGRAMMY W 2 wNA^ALE WSE PEREMEN- 2 w NEJ SODER- 2 var 25 - Z. 2 sAMAQ GLAW- 2 pRI WWODE ZABLOKIROWANY WSE KLAWI- 2 pRI OPREDELE- 2 pEREWOD OKAN^IWAETSQ NA PERWOM NECIFROWOM SIMWOLE. 2 oSWOBOVDA@]AQSQ STROKA O^I]AETSQ I ZAKRA[IWAET- 2 oSOBOE WNIMANIE OBRA- 2 oPREDELQEMYE FUNKCII TAKOWY: 2 kotorym PE^ATAETSQ TEKST. 2 keypress. 2 gLAWNAQ CELX \TOJ KOMANDY - 2 eSTESTWENNO, \TO NE OTNOSITSQ K TEKSTU WNUTRI KA- 2 eSLI U wAS WOZNIKNUT KA- 2 eSLI POSLEDNIE DWE KOMANDY PRIMENQ@TSQ DLQ USTANOWKI REVI- 2 eGO CELX - DEMONSTRACIQ TEKSTOWOJ I GRAFI^ESKOJ IN- 2 dEMONSTRACIQ TEKSTA 2 dEJSTWIE \TOJ KOMAN- 2 autoexec). 2 autoexec). 2 ^ALE KAVDOJ GLAWY. 2 ^AE wAM SAMIM PRIDETSQ WYKRU^IWATX BUMAGU IZ 2 ]EJSQ W NA^ALE PERWOJ STROKI STRANICY PRIBLI- 2 \KRAN ZAPOLNQETSQ 2 ZX-SPECTRUM: 2 ZX-SPECTRUM, 2 ZX-SPECTRUM c 1989 2 ZX Spectrum!" 2 ZX SPECTRUM!") 2 ZNA^ENIE WTOROGO PARAMETRA. 2 ZITELXNO ^EREZ KAVDYE 65 STROK TEKSTA I W NA- 2 ZDANNOJ S 2 ZAPUSTITE FAJL 2 ZAMENQET PEREMENNU@ a, 2 ZADA@T LEWYJ WERHNIJ UGOL POLQ, 2 WINDOW).{Mode 6}{TextAttr 14} 2 W SEREDINE PROGRAMMY NE OZNA^AET, ^TO KOMANDY NIVE 2 W PERWOJ VE STROKE 2 USTANOWITE NUVNU@ KODIROWKU TEKSTA, USTANOWITE NA^ALXNYE CWE- 2 UKAZYWA@T ATRIBUTNYE KOORDINATY LEWOGO 2 TextOutSpace 0 0 31 23) 2 TextOutSpace 0 0 31 23 2 TR-DOS.{Mode 6}{TextAttr 14} 2 TEXTVIEW, ASK, READ, READNUM, MENU, 2 TEXTVIEW, 2 TEXTVIEW, 2 TEXTVIEW), 2 TEXTVIEW), 2 TEXTOUTSPACE.{Mode 6}{TextAttr 14} 2 TEXTATTR, 2 TAKOJ PEREHOD QWLQETSQ NEOBHODIMYM SREDSTWOM, T.K. 2 T.K. WYHODQ]IJ ZA 2 STROKA NE SODERVIT W 2 STRANICU W OTDELXNYJ FAJL). oPREDELITX NA^ALO 2 SOZDAETSQ W OBY^NOM TEKSTOWOM REDAKTORE I ZAPI- 2 SLU^AJNOE ^ISLOWOE ZNA^ENIE W INTERWA- 2 SIMWOLY S KODAMI 13 I 14 OBOZNA^A@T KONEC STRO- 2 SIMWOLAMI. zNA^ENIE 2 SIMWOL, SOOTWETSTWU@]IJ NAVATOJ NA KLA- 2 SEGA MEGA 2 RUKCII PO PROGRAMME. 2 RE[IL RAZOBRATXSQ S KOMANDOJ 2 REAKCI@ NA NAVATIE 2 READ <num> 2 READ <num> 2 RAWNOM 0, 2 R (Retry) 2 Pause Key. 2 PROSTO ZAMENQ@T LOGI^ESKOE i NESKOLXKIH USLOWIJ. tAK VE I 2 PROGRAMMY - 2 PRODOLVENIE PE^ATI ^EREZ STROKU 9999 (SM. PRI- 2 PRINTERA. pRAWDA, MOVNO POSTAWITX KOMANDU #21 2 PRI RABOTE S DISKOM. eSLI REAKCIQ WKL@^ENA, PRI NAVATII 2 PRESENTATION MASTER, 2 PRESENTATION MAS- 2 POZWOLQET SOZDATX 2 POZWOLQET PRO- 2 POZICIQ PE^ATI NE PERENOSITSQ NA NOWU@ STROKU. pRIME- 2 POSTAWXTE KOMANDU WKL@^ENIQ "RODNOJ" KODIROWKI PROGRAMMY. 2 POSKOLXKU PRI ZAPUSKE WKL@^ENA ALXTERNATIW- 2 POLXZU@TSQ W TEKSTE. 2 POLXZOWA- 2 POLU^IT ZNA^ENIE NOMERA TEKU]EGO 2 POLE WYBORA. pRI WYHODE 2 PM-LAN ( 2 PM-ILLUSTRATOR. 2 PM-ILLUSTRATOR. 2 PM-ILLUSTRATOR 2 PM 1.0, autoexec 2 PE^ATX TEKSTA (NAPRIMER, MOVNO ZAPISATX KAVDU@ 2 PE^ATAETSQ ^UTX-^UTX ME- 2 PAUZA OKON- 2 OZNA^AET ^ISLOWOJ PARAMETR, PEREDAWAEMYJ TOLXKO ^EREZ 2 OZNA^AET STROKOWOJ PARAMETR, PEREDAWAEMYJ TOLXKO ^E- 2 OSU]ESTWLQETSQ PRI 2 OPRA[IWA@TSQ NARAWNE S 2 O, 5, CS/5) 2 O, 5, CS/5 ) 2 NOGO FAJLA W PA- 2 NII WNE[NEGO DRAJWERA), TO wAM SAMIM PRIDETSQ 2 NE PROWERQET, BYLO LI DO 2 NE PRIWEDET 2 NE MOVET NAJTI UKAZANNU@ METKU. 2 NE ISPOLXZUJTE AWTOMATI- 2 NE GOWORQ UVE O TOM, ^TO DLQ SOHRANQE- 2 NASTROJTE TABLICU UPRAWLQ@]IH KO- 2 NAQ KOMANDA 2 MQTX. nA ZAPROS 2 MOVNO RAZDE- 2 MOVNO OTMENITX, SM. KOMANDU 2 MOVET BYTX I 2 MER); \TO, KSTATI, ^ASTO BYWAET PRI PODKL@^E- 2 L="Presentation Master") 2 KOMPRESSIROW- 2 KOGDA NA \KRANE 2 KOGDA NA \K- 2 KEY, BORDER, TEXTATTR, MODE, TEXTOUTSPACE, GRAPHOUTSPA- 2 KAVDOJ STRANICY MOVNO PO KOMANDE #98, WSTE^A@- 2 KATALOGA DISKA. 2 KAKIM-LIBO SPOSOBOM ORGANIZOWATX POSTRANI^NU@ 2 K WERHNEMU REGISTRU. 2 K POTOKU #3, UBERITE STROKU 9800. w \TOM SLU- 2 INFORMACII, A TAKVE 2 ILI WYKL@^ITX (PRI PARAMETRE 2 IF.{Mode 6}{TextAttr 14} 2 I WSE FAJLY S TEKSTAMI, IL- 2 I TAK DO 2 I POSLE NEGO - KOD KLAWI[I, NAPRIMER 2 I PEREME- 2 I KODIROWKA FAJLA, SODERVA]EGO PROGRAMMU, OTLI^AETSQ OT 2 I KLAWI[A, NAVATAQ POLX- 2 I <DLINA> KAVDOGO POLQ WYBORA. 2 GRAPHOUTSPACE. 2 GRAPHOUTSPACE) 2 GRAPHOUTSPA- 2 FORMATA, OVIDA@]IE NAVATIQ KLAWI[I I WOZWRA]A- 2 ERROR). 2 ENTER, SPACE 2 ELSE.{Mode 6}{TextAttr 14} 2 DOW SLEDU@]IM OBRAZOM: 2 DOSTI^X, NAVAW 2 DOLVNY STOQTX OPERATORY, WYPOLNQ@]IE PEREWOD 2 DLQ ZAPOMINANIQ INFORMACII S \KRANA ILI NET. 2 Command ON 2 Command OFF . 2 Command <str> [Key]; 2 Command 68 2 Caps Shift 2 CS/1 - \7. 2 COMPRESSED 2 BUDET PODRAZUMEWATXSQ) 2 ANNOJ KARTIN- 2 A, X, K ) 2 A TAKVE SODERVIMOE \KRANA I 2 A (Abort) 2 @]IE UPRAWLENIE REDAKTORU. 2 <{TextAttr 11} 2 <x>, <y> 2 <x2>, <y2> - 2 <x1>, <y1> 2 <vnum>.{Mode 6}{TextAttr 14} 2 <str>.{Mode 6}{TextAttr 14} 2 <num>. <num> 2 <<<<<<< ) 2 9 vIRN+ 2 27 69 - 10 vIRN- 2 27 70 - 2 7 * 8 * 2 65535.{Mode 6}{TextAttr 14} 2 5 * 6 * 2 3 rAS[+ 3 27 87 1 4 rAS[- 3 27 87 0 2 1991, 1992, 1993 2 1.0{TextAttr OFF}. 2 1.0{TextAttr OFF} 2 1.0 (08.1995)" 2 1 rUS. 1 14 - - 2 lAT. 1 15 - - 2 0.{Mode 6}{TextAttr 14} 2 /WO WESX \KRAN/, 2 /KONEC KOMMENTARIQ/ ) 2 .................. {TextAttr 13}48{TextAttr OFF} 2 ................. {TextAttr 13}23011{TextAttr OFF} 2 ............. 2 ........... 2 ..... {TextAttr 13}26{TextAttr OFF} 2 ..... {TextAttr 13}24576..42524{TextAttr OFF} 2 .... {TextAttr 13}2{TextAttr OFF} 2 ... {TextAttr 13}25{TextAttr OFF} 2 ... {TextAttr 13}14{TextAttr OFF} 2 - {TextAttr 14}BUMPY.{Mode 8}{TextAttr OFF} 2 - wwerh 2 - wprawo 2 - wniz 2 - wlewo 2 - w na~alo teksta 2 - w konec teksta 2 - ^TO OZNA^AET: PEREMENNAQ, NOMER KOTOROJ (OT 0 DO 25) ZAPISAN 2 - ^TO OZNA^AET DWA 2 - ZABOJ POSLEDNEGO WWEDENNOGO SIMWOLA; 2 - WYHOD IZ 2 - WSTAWKA ILL@STRACII. 2 - VELTYM PO SINEMU, A TO^KA W KONCE - BEZ ATRIBUTOW. dEJST- 2 - USTANOWKA REVIMA PE^ATI; 2 - USTANOWKA CWETOW PE^ATI; 2 - QZYK SISTEMY 2 - PRAWYJ NIVNIJ. dOPUSTIMYE ZNA^ENIQ TAKIE VE, KAK W KOMANDE 2 - PRAWOGO NIVNEGO. dIAPAZON ZNA^E- 2 - POWTORITX POPYTKU ^TENIQ SBOJNOGO SEKTORA, 2 - PEREKL@^ENIE rus 2 - OT 0 DO 21. pARAMETRY 2 - LOVNO), PROGRAMMA WYPOLNQET- 2 - KOORDINATY LEWOGO 2 - KOORDI- 2 - KONEC WWODA. 2 - KOMANDNYJ QZYK. |TO ZNA^IT, ^TO KAVDOE DEJS- 2 - IGNORIROWATX SBOJNYJ SEKTOR. wYBOR PROIZWODITSQ KLAWI[AMI wwerh I 2 - I DEMONSTRACIONNYJ DISK GOTOW. 2 - FIKSACIQ WERHNEGO REGISTRA; 2 - E]E I 14). 2 - 65535.{Mode 6}{TextAttr 14} 2 (\TO ZNA^IT: \KRAN O^I]EN, TEKU]IJ ATRIBUT - 56 2 (TR DOS), 2 (TO^NEE, SKOREE WSEGO WOZWRAT W REDAKTOR I 2 (SM. TAKVE 2 (SM. TABLICU) PERED KAVDOJ KOMANDOJ #98 W TEK- 2 (SM. NIVE). 2 (PERWYJ PARAMETR: 2 (IMENA PEREMENNYH, KAK I KOMANDY, MOVNO PISATX I MALENXKI- 2 (DEJSTWIE POSLEDNIH DWUH KLAWI[ SM. W KO- 2 (105=64+5*8+1 - QRKOSTX, GOLUBOJ FON, SINIJ TON) 2 '{TextAttr 13}\{TextAttr OFF}' 2 '{TextAttr 13}:{TextAttr OFF}' 2 '{KEY}'.{Mode 8}{TextAttr OFF} 2 "~TO-TO TUT NE TAK..." 2 "wY WWELI ^ISLO " t 2 "wOT \TO UDA^A!" 2 "q TAK I DUMAL!" 2 "pRIWET POLXZOWATELQM 2 "nU I LADNO!" 2 "ZX Spectrum" 2 "TEKST" . 2 "SPECTROFON" ( 2 " STEP ", 2 |TO UZKOSPECIALIZIROWANNYJ QZYK, ON NE 2 {TextAttr 14}var 25{TextAttr OFF} - 2 {TextAttr 14}CS/1{TextAttr OFF} - {TextAttr 14}\7{TextAttr OFF}. 2 {TextAttr 141} 2 {TextAttr 13}PRESENTA- 2 {TextAttr 13}32..127{TextAttr OFF}, 2 {TextAttr 13}14{TextAttr OFF} 2 {TextAttr 13}13{TextAttr OFF}, 2 {TextAttr 13}13{TextAttr OFF} 2 {TextAttr 12}autoexec{TextAttr OFF} 2 {TextAttr 12} 2 w \TOM SLU^AE KOMPX@TER BUDET SBRASYWATXSQ SRAZU 2 w KA^ESTWE PARAMETRA 2 pO OPYTU 2 pEREHOD NA PER- 2 nAVMITE L@BU@ KLAWI[U DLQ INICIALIZACII. 2 nALI^IE DANNOJ KOMANDY W KONCE PROGRAMMY NE OBQZATELX- 2 mO]NYJ WSTROENNYJ DEMONSTRATOR TEKSTOW POZWO- 2 mOVNO SOSTAWITX I WLOVENNU@ KONSTRUKCI@, NAPRIMER: 2 l@BAQ O[IBKA WEDET K OSTANOWU PROGRAMMY I W KONE^NOM 2 kROME TOGO, POSKOLXKU \TO, W PRINCIPE, O[IBKI NE SISTEMY, A 2 kOMANDA USTROENA TAKIM OBRAZOM, ^TO POLXZOWATELX NE MOVET 2 kLAWI[I, NE IME@]IE SWOEGO PE^ATNOGO SIMWOLA, MOVNO OPREDE- 2 ZNA^ENIE KODA PERWOGO SIMWOLA STROKI 2 ZNA^ENIE 1, ESLI NA KLAWIATURE NAVATA 2 ZADA@TSQ W ATRIBUTNYH ZNAKOMESTAH OTNOSITELXNO LEWOGO WERHNEGO 2 WYBRANNOE POLE OSTAETSQ INWERSNYM. kOMANDA 2 WHODIT W 2 W ^ISLOWU@ FORMU I REZULXTAT PRISWOITX 2 TextAttr OFF 2 TextAttr 2 TO^NEE, TAKIE KONSTRUKCII MOGUT NE 2 TEXTVIEW, ASK, 2 TEXTVIEW, 2 Symbol Shift 2 Sound ON 2 SO SPECIFIKATOROM 2 S TEKSTOM ISPOLNQEMOJ PROGRAMMY 2 READ). 2 PRESENTATION MASTER. 2 PRESENTATION MASTER, 2 PRESENTATION MASTER (PM) 2 PRESENTATION MASTER - 2 PREDNAZNA^EN DLQ SOSTAWLENIQ DEMONSTRACIONNYH ROLIKOW 2 PM-LAN - 2 PM-LAN 2 P R E S E N T A T I O N M A S T E R 2 P R E S E N T A T I O N M A S T E R 2 OZNA^AET ^ISLOWOJ PARAMETR (^ISLOWAQ PEREMENNAQ ILI 2 OZNA^AET STROKOWOJ PARAMETR (STROKOWAQ PEREMENNAQ ILI 2 OZNA^AET PEREMENNU@ L@BOGO TIPA ILI NEOPREDELENNU@; 2 NE PE^ATAET NIKAKIH SOOB]ENIJ NA 2 NAPRIMER: 2 NADO WYZYWATX DO ORGANIZACII SLEDU@]EGO MEN@. eSLI wY \TOGO NE 2 NA STRANICU - 2 MOVET WSTRE^ATXSQ I BEZ SOOTWETSTWU@]EGO 2 MOVET USTANOWITX USLOWNYJ MARKER NA L@BOE IZ PERE^ISLENNYH POLEJ 2 MOVET IZMENQTXSQ W PREDELAH OT 1 DO 62. w KOMANDE 2 MOVET IMETX ZNA^ENIQ 5, 6 ILI 8, ^TO OPREDELQET [IRINU WYWODIMYH 2 LineLen 62 2 Key UP q i 9 2 Key RIGHT p l 7 2 Key QUIT \7 \14 2 Key LEFT o j 6 2 Key HOME Q \11 2 Key FIRE 0 \32 \13 2 Key END A \10 2 Key DOWN a k 8 2 KAK W OBY^NYH QZYKAH, A KO WSEM USLOWIQM 2 GraphOutSpace 0 0 31 23 2 GRAPHOUTSPACE. 2 GENERIRUETSQ SOOB]ENIE OB O[IBKE, INA^E NAVATIE 2 GENERACI@ SOOB]ENIJ OB O[IBKAH 2 Error ON 2 Enter - 2 DLQ INTERPRETATORA NI^EM NE OTLI^AETSQ OT 2 DANNAQ USTANOWKA NE RASPROSTRANQETSQ, \TA KOMANDA 2 Command ON|OFF 2 Caps Shift 2 CS/BREAK 2 CS/BREAK 2 CLS 56 ( 2 Break ON 2 Border 7 2 A WNE[NIJ DRAJWER NE PODKL@^EN 2 <x>, <y> 2 <x>, <y> 2 <vnum> 2 65535, 2 2. "ZX-FORUM", "ZX FORUM-2" - 2 19 (2*8+3) 2 0,0). < 2 ......................... {TextAttr 13}91{TextAttr OFF} 2 ......................... {TextAttr 13}51{TextAttr OFF} 2 ............. {TextAttr 13} 2 ........... {TextAttr 13}3 2 (ZADERVKA 1 SEK.) 2 (ZADERVKA 1 MIN. S OPROSOM KLAWIATURY) 2 (W DALXNEJ[EM WOZMOVNOSTX ADRESACII K PEREMENNYM 2 (TEPERX a=35) 2 (SM. OPISANIE \TOJ KOMANDY) I OBE ILL@STRACII, FRAGMENTY KOTORYH 2 (POLNOE ZAWISANIE) 2 (POLE S OTSTUPOM 1 OT GRANIC \KRANA) 2 (PEREJDET NA 2 (NAPRIMER, ESLI NAVMUT KLAWI[U t, TO 2 (FAKTI^ESKI - OVIDANIE OTPUSKANIQ KLAWI[) 2 (DLQ ^EGO W OSNOWNOM I PRIMENQETSQ), TAK I 2 (56=7*8+0 - ^ERNYM PO BELOMU) 2 (32=4*8+0 - ZELENYJ FON, ^ERNYJ TON) 2 (15=1*8+7 - SINIJ FON, BELYJ TON) 2 ( C="y", not A<7 2 ( C="y", A<7 ) 2 "" (PUSTAQ STROKA); 2 ~TOBY POLU^ITX OTWET NA \TOT WOPROS, RAZDELITE NACELO [IRINU POLQ NA 5/8 2 {TextAttr 13}<vstr>{TextAttr OFF} 2 {TextAttr 13}<vnum>{TextAttr OFF} 2 {TextAttr 13}<var>{TextAttr OFF} 2 {TextAttr 13}<str>{TextAttr OFF} 2 {TextAttr 13}<num>{TextAttr OFF} 2 {Mode 6}{TextAttr 13}SET <var> <num>|<str>{Mode 8}{TextAttr OFF} 2 {Mode 5}Mode 5{Mode 6} 2 wniz KAK W OBY^NOM MEN@. pOSLE PRINQTIQ RE[ENIQ ZATERTOE MESTO \KRANA 2 wnimanie! pERED PE^ATX@ INSTRUKCII W REDAK- 2 wlewo I wprawo. pEREHOD W NA^ALO I W KONEC TEKSTA - KLAWI[I w na~alo I 2 wYHOD PREDSTAWLQLSQ TAKIM: AWTOR (ILI ORGANIZATOR DEMONSTRACII) SOZDAET 2 wSE OSTALXNYE SIMWOLY, KODY KOTORYH NE POPADA@T W DIAPAZON 32..127, IG- 2 w konec. wYHOD IZ DEMONSTRATORA I PRODOLVENIE PROGRAMMY OSU]ESTWLQETSQ 2 w IMENI METKI, W OTLI^IE OT KOMAND, RAZLI^A@TSQ PROPISNYE I STRO^NYE BU- 2 var var R 2 var 1 - B, 2 ukp PREFIKS 27 2 uTILITA 2 sPASIBO ZA WNIMANIE. 2 sKAZANNOE WOWSE NE OZNA^AET, ^TO W PAMQTI BUDET NAHODITXSQ DWE KOPII OD- 2 sINTAKSIS I DEJSTWIE PERWYH DWUH KOMAND POLNOSTX@ IDENTI^NO SOOTWETSTWU- 2 pRIME^ANIE: KOMANDY, POME^ENNYE '*', NE IS- 2 pRIMER: 2 pRI UKAZANII W KOMANDE ATRIBUTA IZOBRAVENIE WYWODITSQ NE S SOBSTWENNYMI 2 pRI NAVATII 2 pOSLE TOGO KAK NUVNYJ REVIM WYB- 2 pOLXZOWATELX S POMO]X@ KLAWI[ wlewo, wprawo, wwerh, wniz (SM. KOMANDU 2 nA KOMANDU 2 kROME TOGO, KAVDOE OKNO S SOHRANENIEM \KRANNOJ INFORMACII ORGANIZUETSQ W 2 kROME TOGO, W STROKE 9800 bEJSIK-ZAGRUZ^IKA 2 kROME TOGO, \TO SOOB]ENIE POQWLQETSQ, ESLI PRI ISPOLXZOWANII KOMANDY 2 kOMANDA WYPOLNQETSQ KORREKTNO KAK DLQ LATINSKIH, TAK I DLQ RUSSKIH BUKW 2 iNA^E GOWORQ, ILL@STRACIQ, SOPRIKASA@]AQSQ S ILI WYHODQ]AQ ZA WERHN@@ 2 eSLI wA[A PRO[IWKA NE POZWOLQET PE^ATATX KO- 2 eSLI VE U wAS NE RABOTAET I WYHOD W bEJSIK 2 eSLI KOMANDA OPOZNANA I DOPUSTIMA K ISPOLXZOWANI@ WNUTRI TEKSTA, ONA WY- 2 eSLI W TEKSTE PROGRAMMY PRIMENQETSQ KODIROWKA 2 eSLI STROKA NE PREDSTAWLQET SOBOJ SIMWOLXNU@ ZAPISX ^ISLA, WYPOLNENIE 2 eSLI NI ODNOJ KLAWI[I NE BUDET UKAZANO, DEJSTWIE DANNOJ FUNKCII BUDET 2 dLQ UPRAWLENIQ PROGRAMMOJ ISPOLX- 2 dLQ POLU^ENIQ DOPOLNITELXNOJ IN- 2 ^TO-TO WRODE "INFORMACIONNOGO ROLIKA" - \LEKTRONNU@ INSTRUKCI@, REKLAM- 2 ^TO WERHNQQ STROKA OKNA DOLVNA BYTX PROINWERTIROWANA (NAPRIMER, DLQ RAZ- 2 ^TO TO VE SAMOE, ^TO I 2 ^TO MOVNO OTKRYTX ODNOWREMENNO NE BOLEE 14 OKON, PRI^EM NEWAVNO, ISPOLX- 2 ^TO POSLE PRINQTIQ ODNOGO IZ TREH PREDOSTAWLQEMYH NA WYBOR RE[ENIJ MOV- 2 ^TO O[IBKA W PARAMETRAH WYPOLNQEMOJ KOMANDY PRIWEDET K OBY^NOMU SOOB]E- 2 ^IWATX NI^EGO NE PONIMA@]EGO POLXZOWATELQ KAKIMI-TO MUDRENYMI SOOB]ENIQ- 2 ^ITSQ LIBO PO ISTE^ENII UKAZANNOGO WREMENI, LIBO PRI NAVATII L@BOJ KLA- 2 ^ISLOWOE ZNA^ENIE W PEREMENNU@ 2 ^ISLA - NA L@BOE IZ PERE^ISLENNYH USLOWIJ. eSLI ZNA^ENIE WYRAVENIQ IS- 2 ^ESTX 1, POLU^ITSQ 65535. 2 ^ESTWO PARAMETROW NE OGRANI^ENO. pOSLE PE^ATI WSEH PARAMETROW POZICIQ 2 ^ESKOGO PEREHODA NA NOWU@ STROKU (MOVNO USTANOWITX MAKSIMALXNOE ZNA^ENIE 2 ^ATATX TEKST W WERHNEJ INWERSNOJ STROKE OKNA). kAK WSEGDA PRI USTANOWKE 2 ^ASTI^NO SKRYTY, A ^ASTI^NO WYSTUPA@T S WERHNEGO I NIVNEGO KRAQ POLQ 2 ^ANIE: RUSSKIE SIMWOLY WWODQTSQ W ALXTERNATIWNOJ KODIROWKE. 2 ^AE NE DOLVEN WSTRE^ATXSQ NI W KAKOM TEKSTE. 2 ]ENIE PO TEKSTU WWERH I WNIZ NA STROKU I STRANICU, W NA^ALO I W KONEC 2 ]EGO TEKSTA BUDET USTANOWLEN REVIM WYKL@^ENNYH ATRIBUTOW. eSLI VE KOMAN- 2 ]AETSQ. pRI PEREDA^E UPRAWLENIQ SOHRANQ@TSQ ZNA^ENIQ WSEH PEREMENNYH, 2 ]AET POZICI@ PE^ATI W EGO LEWYJ WERHNIJ UGOL. pRIME^ANIE: NEOBHODIMO 2 \TOJ STROKE NE DOLVNO BYTX PE^ATNOGO TEKSTA, ZA ISKL@^ENIEM SLU^AQ, KO- 2 \KSPEREMENTIROWATX! 2 \KRANE, PO\TOMU wY SAMI DOLVNY NAPE^ATATX ZAGOLOWKI KAVDOGO POLQ KAK RAZ 2 [IT PEREHOD NA PERWU@ IZ NIH. w OTLI^IE OT MNOGIH ALGORITMI^ESKIH QZY- 2 [IRINE POLQ 32 (WO WESX \KRAN) W REVIME 6). pRIME^ANIE: NALI^IE 2 [IRINE DOLVNA POLNOSTX@ "WLEZATX" W POLE WYWODA. nA^ALO ILL@STRACII 2 [IRENIE <r>). pOKAZYWAETSQ ILL@STRACIQ, SOZDANNAQ WHODQ]EJ W PAKET 2 [I, KROME CIFR, 2 [AQ ^ASTX DANNOGO OPISANIQ SISTEMY POSWQ]ENA KOMANDAM 2 ZYWA@TSQ SOOTWETSTWU@]IM IM SIMWOLOM, NAPRIMER, KLAWI[A t - SIMWOLOM 2 ZU@]IH SLOW. tAK, 2 ZOWALSQ SPECIFIKATOR 2 ZONTALXNOE POZICIONIROWANIE). zNA^ENIE <SDWIG> MOVET IZMENQTXSQ OT 0 DO 2 ZNA^ENIQ - OT 0 DO 7. 2 ZNA^ENIQ TEKU]EGO REVIMA MINUS 1 (T.E. DO 4 ILI 5 DLQ REVIMOW 5 I 6 SO- 2 ZNA^ENII DANNOGO PARAMETRA (65535) DLITELXNOSTX PAUZY BUDET PRIBLIZI- 2 ZNA^ENIE 0. pRIME^ANIE: KOMANDA 2 ZNAKOMESTAH OT LEWOGO KRAQ TEKU]EGO POLQ WYWODA TEKSTA; ILL@STRACIQ PO 2 ZAPISANNU@ W FAJL S UKAZANNYM IMENEM. <OTSTUP> ZADAETSQ W ATRIBUTNYH 2 ZAGRUZKI BUDET WOZWRA]EN UKAZATELX NA NAHODQ]IJSQ W PAMQTI FAJL. 2 ZAGRUZKE ILL@STRACII, KAK \TO DELAETSQ W DEMONSTRACIONNOJ PROGRAMME: 2 ZADERVKA NE O]U]AETSQ PRI ISPOLXZOWANII NE BOLEE ODNOJ-DWUH KOMAND W 2 Window A B 8 3 C store 2 Window 22 11 8 4 24 shade store 2 WY[E ILI NIVE PRI PEREHODE MARKERA. kOORDINATY I DLINA KAVDOGO POLQ ZA- 2 WYWODQTSQ; NAPRIMER, DEMONSTRATOR, WSTRETIW STROKU 2 WYWODIMYJ KOMANDOJ 2 WYWODE KOMPRESSIROWANNOJ KARTINKI POLE WYWODA GRAFIKI IGNORIRUETSQ I WY- 2 WYWODA. kOLI^ESTWO SIMWOLOW W STROKE SLEDUET DELATX NE BOLX[E, ^EM MOVET 2 WYWODA W DANNYJ MOMENT (ESLI TAKAQ SITUACIQ WOZMOVNA W wA[EM TEKSTE). 2 WYWODA TEKSTA TAKIM OBRAZOM, ^TOBY PE^ATX PROIZWODILASX WNUTRI OKNA S 2 WYSOTE SPRAJTA 19 (2*8+3) ATRIBUTY UKAZYWA@TSQ DLQ TREH LINIJ. pARAMET- 2 WYPOLNQETSQ KLAWI[AMI wwerh I wniz (SM. KOMANDU 2 WYPOLNENIE PROGRAMMY BUDET PRERWANO I WYWEDENO SOOB]ENIE OB O[IBKE (POD- 2 WWESTI NEKORREKTNOE ^ISLO ILI NE WWESTI NI^EGO. 2 WU@ METKU (RASPOLOVENNU@ POSLE 2 WTOROM - WYPOLNQETSQ KONKATENACIQ (SLIQNIE) STROK. 2 WSTROENYM W FAJL IZOBRAVENIQ DEKOMPRESSOROM: FAJL ZAGRUVAETSQ W SWOBOD- 2 WSTAWKA ILL@STRACIJ W TEKST, O ^EM SM. OPISANIE KOMANDY 2 WSEGDA POZWOLQET WWODITX NE BOLEE 5 SIMWOLOW. 2 WPRO^EM, I ODNOTONNYJ), KOMANDY SMENY REVIMA I CWETA ^UTX-^UTX ZADERVI- 2 WOPROS, SKOLXKO SIMWOLOW REVIMOW 5 I 6 UME]AETSQ W POLE ZADANNOJ [IRINY. 2 WODQTSQ PO-ANGLIJSKI. 2 WOD PROIZWODITSQ NA WESX \KRAN. 2 WOD OSU]ESTWLQETSQ W TEKU]EE POLE, USTANOWLENNOE KOMANDOJ 2 WNUTRI TEKSTA NE ZAKRYTA FIGURNAQ SKOBKA. 2 WNIZ PRI PARAMETRE 2 WLQ@TSQ BUKWY 2 WKL@^ITE EE KOMANDOJ 2 WI[I; PRI \TOM DO NA^ALA OTS^ETA WREMENI OVIDAETSQ OTPUSKANIE WSEH 2 WITSQ TEKU]IM. pOZICIQ PE^ATI PEREME]AETSQ W LEWYJ WERHNIJ UGOL POLQ. 2 WINDOW). 2 WIE KONKRETNOJ KOMANDY RASPROSTRANQETSQ NA WESX TEKST POSLE NEE, WPLOTX 2 WIATURE KLAWI[E. wYPOLNENIE PROGRAMMY PRIOSTANAWLIWAETSQ DO TEH POR, PO- 2 WETSTWU@]IE IZMENENIQ. pO\TOMU U MENQ BOLX[AQ PROSXBA - PRISYLAJTE SWOI 2 WERHNEGO UGLA TEKU]EGO POLQ WYWODA (LEWOE WERHNEE ZNAKOMESTO IMEET KOOR- 2 WERHNEGO UGLA OKNA, OTS^ITYWAEMYE OT LEWOGO WERHNEGO UGLA \KRANA; DOPUS- 2 WERHNEGO UGLA ILL@STRACII; WSE OSTALXNYE PARAMETRY ZAPISANY PRQMO W FAJ- 2 WARIANTA ISPOLXZOWANIQ KOMANDY: 2 WANII DISKA W KOMANDE 2 WA@T WYWOD TEKSTA, T.K. TREBU@T WREMENI NA INTERPRETACI@. pRAKTI^ESKI 2 W TOM MESTE \KRANA, GDE RASPOLAGAETSQ SOOTWETSTWU@]EE POLE. 2 W SISTEME 2 W ALXTERNATIWNOJ KODIROWKE. 2 W ZNAKOMESTAH 8H8 TO^EK OT LEWOGO WERHNEGO UGLA \KRANA: 2 W TEKST KOMANDY. kOMANDY ZAPISYWA@TSQ W FIGURNYH SKOBKAH, PRI^EM MEVDU 2 W PEREMENNOJ, NOMER KOTOROJ UKAZAN W PEREMENNOJ 2 VITSQ MNOGO PRIMEROW ISPOLXZOWANIQ PO^TI WSEH KOMAND SISTEMY. 2 VET WYHODITX ZA EGO NIVNIJ KRAJ. 2 USTANOWOK KOMAND 2 USTANAWLIWATX KOMANDAMI 2 UMESTITXSQ W ZADANNOM POLE WYWODA (SM. TAKVE 2 UKAZYWA@TSQ PARAMETRY. tAKOE POSTROENIE BOLX[E WSEGO POHOVE NA STRUKTURU 2 UKAZANIEM DWOETO^IQ ':' I SRAZU POSLE NEGO - IMENI METKI, NAPRIMER: 2 UKAZAN, ZAKRASITX TEKU]IM ATRIBUTOM). eSLI ATRIBUT UKAZYWAETSQ, ON STA- 2 UGLA \KRANA (POLE GRAFI^ESKOGO WYWODA (SM. KOMANDU 2 TextOutSpace C D 31 23 2 TextOutSpace C 0 31 B 2 TextOutSpace 16 0 31 23 2 TextOutSpace 0 D B 23 2 TextOutSpace 0 0 B B 2 TextOutSpace 0 0 15 23 2 TextAttr 0 2 TWIE WYZYWAETSQ SOOTWETSTWU@]EJ KOMANDOJ, W KOTOROJ, ESLI NEOBHODIMO, 2 TRETXEGO PARAMETRA TOGDA, KOGDA ON NEDOPUSTIM, NE WEDET K O[IBKE; W \TOM 2 TREBUETSQ DLQ ZADA^ DANNOGO KLASSA. 2 TRACIJ) ZAGRUVA@TSQ W BUFER NA SWOBODNOE MESTO, I TOLXKO PRI NEHWATKE 2 TOWU@ STROKU DLINOJ DO 62 SIMWOLOW. wSEGO IMEETSQ 26 PEREMENNYH S IMENA- 2 TOW, WYBOR RE[ENIQ SDELAN W DOWOLXNO NEPRIGLQDNOJ FORME. pRI OBNARUVENII 2 TOR tor, OTSTUP SWERHU NE DELAETSQ DLQ TOGO, ^TOBY DATX WOZMOVNOSTX PE- 2 TOLXKO W ALXTERNATIWNOJ KODIROWKE. 2 TOLXKO NE PROBLEMNO-, A MA[INNO-ORIENTIROWANNYJ. 2 TOLXKO NA 8 TO^EK (PO ATRIBUTNYM ZNAKOMESTAM). zATO W POSLEDNEM REVIME 2 TO TIP \TOGO PARAMETRA UKAZYWAETSQ POSLE NAZNA^ENIQ ^EREZ DWOETO^IE, NA- 2 TITE NA TOT FAKT, ^TO FLAG INTERPRETACII WSEGO ODIN, T.E. NELXZQ SOSTAW- 2 TINNO (PRI ISPOLXZOWANII SECIFIKATORA 2 TIMYE ZNA^ENIQ: DLQ <H> - OT 0 DO 29, DLQ 2 TI"). dLQ \KONOMII PAMQTI TEKST REKOMENDU@ NABIRATX BEZ LEWOGO OTSTUPA, 2 TEXTVIEW 2 TEXTOUTSPACE. 2 TERPRETATOR WSTRE^AET OTKRYWA@]U@ SKOBKU '(', ON PROPUSKAET WSE WPLOTX 2 TELXNO 21 MINUTA 51 SEKUNDA. eSLI UKAZAN SPECIFIKATOR 2 TELX NE SMOVET WWESTI SIMWOLOW BOLX[E, ^EM USTANOWLENO KOMANDOJ 2 TEL SDELATX TOLXKO DEMONSTRATOR TEKSTOW. k \TOMU MENQ POBUDILA OSTRAQ 2 TEKSTA; 2 TEKSTA IZOBRAVENIEM MOVNO ISPOLXZOWATX, NAPRIMER, DLQ WYWODA SOOB]ENIQ O 2 TEKST WNUTRI NIH BUDUT NAPE^ATANY KAK OBY^NO; NAPRIMER STROKA 2 TEKA@]IH IZ NEE DRUGIH O[IBOK). sKAZANNOE OTNOSITSQ I K SOOB]ENI@ O LO- 2 TE VE KOMANDY). nA POSLEDNEJ VE KOMANDE SLEDUET OSTANOWITXSQ PODROBNEE. 2 TAT \TOJ VE PEREMENNOJ. w PERWOM WARIANTE PRIMENENIQ KOMANDY WYPOLNQETSQ 2 TAM NAPISANO. s RAZWITIEM \TOJ IDEI STALO PONQTNO, ^TO \TOT SPECI- 2 TALXNOJ. 2 TAKVE WSEMI SPECIALXNYMI KOMANDAMI GENERACII ZWUKA (SM. NIVE). 2 TACIQ BYLA ZAPRE]ENA, ONA BUDET RAZRE[ENA, I NAOBOROT. tAKIM OBRAZOM, 2 TA, REVIM PE^ATI I POLE WYWODA. 2 TA, KLAWI[I UPRAWLENIQ I T.P. - WEDX \TI PARAMETRY DOLVEN USTANAWLIWATX 2 T.K. OTSTUP OT KRAQ \KRANA MOVNO SDELATX, USTANOWIW SOOTWETSTWU@]EE POLE 2 Sub var A C 2 Sub I 1 2 Sub D 1 2 Sub B I 2 Sub A I 2 SprView "demo1p" 14 11 4 32 B 5 2 Source$ Disk$ 2 Set L "" 2 Set H 0 2 Set D 23 2 Set C B ( 2 Set C 7 2 Set C 31 2 Set B var A 2 Set B 23 2 Set B 21 2 Set A 31 2 Set A 128 2 Scroll up 2 Scroll down 2 Scroll Up 2 Scroll Down 2 ScrView "demo1s" 2 SYWAETQ W OBY^NYJ TEKSTOWYJ FAJL (TREBOWANIQ K TEKSTOWYM FAJLAM SM. W 2 SWOITX CELU@ ^ASTX ^ASTNOGO \TOJ PEREMENNOJ. pRI POPYTKE DELENIQ NA 0 2 STWU@]IJ REDAKTOR. rASPROSTRANQTX VE S TEKSTAMI ^UVOJ REDAKTOR BEZ RAZ- 2 STROKU TEKSTA. wSE PARAMETRY OTDELQ@TSQ DRUG OT DRUGA I OT KOMANDY PRO- 2 STROKOWOJ PARAMETR WMESTO ^ISLOWOGO (NAPRIMER, W KOMANDE 2 STROKE, DA I TO NE W KAVDOJ. 2 STRATOR PREWRA]AETSQ W NEKIJ INTERPRETATOR SPECIALXNOGO QZYKA, W KOTOROM 2 STRACIQ (NAPRIMER, PRI PROSMOTRE TEKSTA SNIZU WWERH). |FFEKT ZATIRANIQ 2 STEK, A ZATEM, UDALQQ OKNA W OBRATNOM PORQDKE SPECIALXNOJ KOMANDOJ (SM. 2 STE PROGRAMMY WSTRETQTSQ DWE ILI NESKOLXKO ODINAKOWYH METOK, 2 STARTOWYM ADRESOM. wAVNO, ^TOBY PROCEDURA DEKOMPRESSII BYLA PEREME]AEMOJ 2 STANAWLIWAET \TO POLE. pRIME^ANIE: KOMANDA 2 SQ TEKU]IM ATRIBUTOM. 2 SQ DALX[E KAK OBY^NO, INA^E WSE POSLEDU@]IE KOMANDY IGNORIRU@TSQ, POKA 2 SPRAJTE NE ZAKODIROWANY, I SPRAJT WYWODITSQ S UKAZANNYM ATRIBUTOM. pARA- 2 SPRAJTA. eSLI W KOMANDE UKAZAN <ATRIBUT>, TO S^ITAETSQ, ^TO ATRIBUTY W 2 SOSTOQTX IZ L@BYH RUSSKIH I LATINSKIH BUKW, CIFR, SPECIALXNYH SIMWOLOW 2 SODERVIMOE POLQ NE O^I]AETSQ. 2 SODERVATX LIBO CELOE ^ISLOWOE ZNA^ENIE W INTERWALE 0..65535, LIBO TEKS- 2 SMATRIWATX ZAKOMPRESSIROWANNYE IZOBRAVENIQ. dEKOMPRESSACIQ PROIZWODITSQ 2 SLU^AE ON PROSTO IGNORIRUETSQ. 2 SLOVNAQ I SAMAQ GLAWNAQ KOMANDA SISTEMY, I ONA TREBUET OTDELXNOGO OPISA- 2 SLE ZAGRUZKI SISTEMA I]ET FAJL 2 SKE, PEREPI[ITE TUDA FAJLY 2 SISTEMY, 2 SISTEMY 2 SIMWOLY PE^ATA@TSQ NAMNOGO BYSTREE. 2 SIMWOLOW - SOOTWETSTWENNO 5, 6 ILI 8 TO^EK (WYSOTA SIMWOLOW WSEGDA RAW- 2 SI@ rm. zAME^ANIQ I PREDLOVENIQ MOVNO PRISYLATX PO ADRESU: 2 SDELAETE, POLE TAK I OSTANETSQ INWERTIROWANNYM. 2 SBOQ DISKA RAZDAETSQ ZWUKOWOJ SIGNAL I W LEWOM WERHNEM UGLU \KRANA POQ- 2 SANIQ PRIWODQTSQ PRIMERY. iTAK, PRISTUPIM. 2 S TEM, ^TO DEMONSTRATOR NE GARANTIRUET PE^ATX TEKSTA TAM, GDE ESTX ILL@- 2 S OKONNOGO STEKA I STANOWQTSQ TEKU]IMI. eSLI ^ASTX \KRANA POD OKNOM SO- 2 Random C 2 Random A 2 RYJ USTANOWLEN W DANNOM MESTE \KRANA. aTRIBUT VE RASS^ITYWAETSQ OBY^NYM 2 RY, UKAZANNYE W KOMANDE, DOLVNY SOWPADATX S PARAMETRAMI OTOBRAVAEMOGO 2 RY, A DEMONSTRATOR PRI ZAPUSKE PRO^ITAET \TOT FAJL I WYPOLNIT WSE, ^TO 2 RQET USLOWIQM KOMANDY: NE TOT TIP, WYHOD ZA PREDELY DIAPAZONA I T.P. 2 ROWKU TEKSTA ILI KODIROWKU REDAKTORA 2 ROBNEE OB O[IBKAH SM. GLAWU "sOOB]ENIQ OB O[IBKAH"). 2 RIRUETSQ). <[IRINA> SPRAJTA ZADAETSQ TAKVE W ZNAKOMESTAH, A WOT <WYSOTA> 2 RE[ENIQ AWTORA NE BUDET NI ODIN UWAVA@]IJ SEBQ PROGRAMMIST. 2 REZULXTAT UMNOVENIQ PREWY[AET 65535, PEREMENNOJ BUDET PRISWOENO MAKSI- 2 REZIDENTNYH FAJLOW (PODROBNEE OB ORGANIZACII FAJLOW SM. RAZDEL O K\[IRO- 2 REVIMOW. nE GOWORQ O TOM, ^TO PESTRYJ TEKST HUVE WOSPRINIMAETSQ (KAK, 2 REIMENUJTE rm 1.0 W 2 REDELENII PEREMENNOJ INTERPRETATOR SAM RAZBERETSQ, KAKOGO TIPA DANNYE 2 REDAWATX PARAMETR ^EREZ PEREMENNU@. 2 REDAKTOROW I RAZLI^NYE KODIROWKI TEKSTOWYH FAJLOW; 2 RE (TREBOWANIQ K TEKSTOWYM FAJLAM SM. W GLAWE "tEHNI^ESKIE PODROBNOS- 2 RAZLI^NOGO TIPA - STROKOJ I ^ISLOM (W KOMANDE 2 RAZLI^ATX TEKU]IJ ATRIBUT, KOTORYM PROIZWODITSQ O^ISTKA \KRANA ILI POLQ 2 RAZDELQ@TSQ SIMWOLOM 2 RAWNO NUL@ ILI NE UKAZANO, PAUZA BUDET BESKONE^NOJ; PRI MAKSIMALXNOM 2 RASPOLAGAETSQ UVE W STROKE, W KOTOROJ RASPOLOVENA KOMANDA, PO\TOMU W 2 RANE NET OTKRYTYH OKON. 2 RANA; KOLI^ESTWO POLEJ MOVET BYTX OT 1 DO 21. pERWONA^ALXNO MARKER USTA- 2 RACI@ ZWUKOWYH \FFEKTOW KOMANDAMI 2 RABOTY S PERWOJ WERSIEJ SISTEMY W NABOR KOMAND BUDUT WNESENY SOOT- 2 RABOTU. iNA^E SRAZU VE NA^INAETSQ WYPOLNENIE PROGRAMMY. 2 Print "?" 2 Print " " 2 Pause 50 key 2 PROGRAMMY S UKAZANIEM KOMANDY, W KOTOROJ PROIZO[LA O[IBKA, POQWITSQ SO- 2 PROGRAMMY PRERYWAETSQ I WYWODITSQ SOOB]ENIE OB O[IBKE. 2 PROGRAMMA, DEMONSTRIRUEMYJ TEKST, WSQ INFORMACIQ, SOHRANENNAQ KOMANDOJ 2 PROCESSE WWODA MOVNO ISPOLXZOWATX SLEDU@]IE UPRAWLQ@]IE KLAWI[I: 2 PRI^INAM WWOD SIMWOLA '"' (DWOJNAQ KAWY^KA) ZABLOKIROWAN WO WSEH KOMAN- 2 PRI^EM PERWYE TRI SLOWA I TIRE BUDUT NAPE^ATANY TEKU]IMI ATRIBUTAMI, 2 PRIMER TAK: 2 PRI POPYTKE OTKRYTX BOLEE 14 OKON. 2 PRI O[IBKE NEWOZMOVNO, T.K. \TO PO^TI OBQZATELXNO PRIWELO BY K CEPI WY- 2 PRI OPISANII SINTAKSISA TAKIH KOMAND SPECIFIKATORY UKAZYWA@TSQ W TOM WI- 2 PRI OBNARUVENII O[IBKI (\TO MOVET PONADOBITXSQ DLQ TOGO, ^TOBY NE OZADA- 2 PRI NAVATII KLAWI[ wybor ILI wyhod. pRI WYHODE WOSSTANAWLIWA@TSQ NA^ALX- 2 PRI OBNARUVENII O[IBKI KOMPX@TER PROSTO SBROSITSQ (PRODOLVATX PROGRAMMU 2 PRETIRUEMYJ, PO\TOMU ON NE PORAVAET SWOIM BYSTRODEJSTWIEM. dA \TO I NE 2 PRESENTATION MASTER. 2 PRESENTATION MASTER 2 PRAWYJ KRAJ TEKST POKAZAN NE BUDET (T.N. REVIM 2 PRAWOGO POLQ). i WSE VE, PRI O[IBKE FRAGMENT LISTINGA BUDET WYWODITXSQ 2 POZICIQ PE^ATI; K\[ DISKA I OKONNYJ STEK O^I]A@TSQ. 2 POSLEDNEE ZNAKOMESTO STROKI W TEKU]EM POLE (NAPRIMER, ESLI H=41 PRI 2 POLQ WYWODA, POZICIQ PE^ATI PEREME]AETSQ W WERHNIJ LEWYJ UGOL POLQ. 2 POLNQETSQ, A WSE, ^TO NAHODITSQ WNUTRI SKOBOK I SAMI SKOBKI NA PE^ATX NE 2 POLE W SPISKE IMEET NOMER 1). eSLI POLXZOWATELX NAVMET wybor, DEJSTWIE 2 POLAGA@TSQ BAJTY RASTRA, ZATEM - ATRIBUTY. eSLI WYSOTA SPRAJTA NE KRATNA 2 POKAZ TEKSTA - LI[X ODNA IZ MNOGIH FUNKCIJ. oSTALOSX LI[X SPROEKTIROWATX 2 POKAVET KOMANDU, W KOTOROJ OBNARUVENA O[IBKA. eSLI VE REVIM WYKL@^EN, 2 PODHODIT DLQ NAPISANIQ OBY^NYH PROGRAMM. w NEM wY NE NAJDETE KAKIH-LIBO 2 PE^ATX SOOB]ENIJ WKL@^ENA, PRI O[IBKE BUDET POKAZAN FRAGMENT LISTINGA 2 PE^ATI NE PEREME]AETSQ NA NOWU@ STROKU. 2 PEREMENNOJ 2 PEREMENNAQ: 2 PARAMETROW PEREDA@TSQ KOORDINATY 2 PAMQTI I PEREPOLNENIQ STEKA PROGRAMMA OSTANAWLIWAETSQ I WYDAETSQ SOOB]E- 2 PAMQTI KAK FAJL, A ODNOWREMENNO W PAMQTI MOVET NAHODITXSQ NE BOLEE 25 2 PAMQTI DLQ ZAGRUVAEMOGO FAJLA SISTEMA NA^INAET UDALQTX IZ BUFERA SAMYE 2 PAMQTI DLQ POSLEDU@]EGO WOSSTANOWLENIQ. kOMANDA PEREUSTANAWLIWAET POLE 2 O[IBKI SISTEMA OSTANOWIT PROGRAMMU, WYDAST SOOTWETSTWU@]EE SOOB]ENIE I 2 OTZYWY. aWTORAM CENNYH PREDLOVENIJ PRI IH VELANII WY[L@ SLEDU@]U@ WER- 2 OTWETSTWU@]EE SITUACII SOOB]ENIE, A ZATEM, POSLE NAVATIQ L@BOJ KLAWI[I, 2 OTWETSTWENNO). <SDWIG> TAKVE NELXZQ ISPOLXZOWATX, ESLI <H> UKAZYWAET NA 2 OTSTUPOM W ODNO ZNAKOMESTO SO WSEH STORON (ESLI PRISUTSTWUET SPECIFIKA- 2 OTNOSITSQ NE K POSLEDNEMU 2 OTKRYWA@]EJ SKOBKOJ I KOMANDOJ NE DOLVNO BYTX PROBELA, NAPRIMER: 2 OSU]ESTWLQETSQ S ZAPRE]ENNYMI PRERYWANIQMI I S ZAGRUVENNYM W REGISTR ws 2 OSOBO GIBKIH KONSTRUKCIJ ILI TIPOW DANNYH. kROME TOGO, \TOT QZYK INTER- 2 ORGANIZOWATX BOLEE-MENEE PRILI^NU@ \LEKTRONNU@ INSTRUKCI@. dLQ \TOGO NE- 2 OPREDELQ@TSQ - STROKA ILI ^ISLO. tIP SODERVA]IHSQ W PEREMENNOJ DANNYH 2 ONIROWATXSQ PO GORIZONTALI S DISKRETNOSTX@ DO 1 TO^KI, A W REVIME 8 - 2 OKONNU@ SISTEMU: OTKRYWAQ OKNA, wY POSLEDOWATELXNO ZANOSITE IH DANNYE NA 2 OKNA ZADA@TSQ W ATRIBUTNYH ZNAKOMESTAH. 2 OBRAZOM: CWET FONA UMNOVAETSQ NA 8 I K NEMU PRIBAWLQETSQ CWET TONA. kRO- 2 OBHODIMO, ^TOBY DEMONSTRATOR 2 OB O[IBKAH INTERPRETATORA. 2 NYJ KATALOG I T.P. 2 NYE), KOTORYE TEM ILI INYM OBRAZOM IZMENQ@T DEJSTWIE \TIH KOMAND. sPECI- 2 NYE ZNA^ENIQ ATRIBUTA I REVIMA PE^ATI; POLE WYWODA NE O^I]AETSQ. 2 NYE NE SODERVAT NIKAKOJ INFORMACII I S^ITA@TSQ NEOPREDELENNYMI. pRI OP- 2 NU@ PAMQTX I ZAPUSKAETSQ S NA^ALXNOGO ADRESA. dEKOMPRESSOR MOVET IZME- 2 NQTX PROGRAMMY S OPISANIEM NA BUMAGE DOROGO, A OPISANIE W WIDE TEKSTOWYH 2 NQTX L@BYE REGISTRY I STATUS (NO NE TIP) PRERYWANIJ. wYZOW DEKOMPRESSORA 2 NOWITSQ TEKU]IM. pRI ISPOLXZOWANII SPECIFIKATORA 2 NORIRU@TSQ. s^ITAETSQ, ^TO W NA^ALE TEKSTA USTANOWLEN LATINSKIJ ZNAKOGE- 2 NOGO I TOGO VE FAJLA - RABO^AQ I SOHRANENNAQ W BUFERE, PROSTO KOMANDE 2 NO. rASPOLOVENIE 2 NO, < - MENX[E, > - BOLX[E. sTROKI MOVNO PROWERQTX TOLXKO NA RAWENSTWO, 2 NO PRODOLVITX RABOTU PROGRAMMY. iNA^E GOWORQ, \TA O[IBKA NE QWLQETSQ FA- 2 NIVE), PEREHODITE KAVDYJ RAZ K PREDYDU]EMU OKNU. gLUBINA STEKA TAKOWA, 2 NIQ. sM. GLAWU "dEMONSTRACIQ TEKSTA". 2 NIQ, REKLAMNYE KATALOGI I DAVE \LEKTRONNYE VURNALY. 2 NIJ DLQ 2 NII POLQ POZICIQ PE^ATI PEREME]AETSQ W EGO LEWYJ WERHNIY UGOL; STAROE 2 NIE OB O[IBKE. 2 NIE O FIZI^ESKOM SBOE DISKA. gLAWNAQ OSOBENNOSTX \TOJ O[IBKI - \TO TO, 2 NI@ OB O[IBKE. 2 NI K KAKOMU REZULXTATU. 2 NET KURSORNOJ RAMKI MEN@. 2 NET DRUGOGO SPOSOBA ORGANIZOWATX CIKL, WETWLENIE I T.P. pRIME^ANIE: 2 NERATOR. 2 NEOBHODIMOSTX W \LEKTRONNYH INSTRUKCIQH DLQ SWOIH PROGRAMM - RASPROSTRA- 2 NENNOM FORMATE: SNA^ALA POSLEDOWATELXNO SLEWA NAPRAWO I SWERHU WNIZ RAS- 2 NEMALOWAVNYJ ARGUMENT - TEKST W KODIROWKE 2 NEM. uPRAWLENIE WYZYWA@]EJ PROGRAMME PRI OKON^ANII WYZWANNOJ NE WOZWRA- 2 NEE WYPOLNQTXSQ NE MOGUT; EE MOVNO OBOJTI, NAPRIMER, S POMO]X@ 2 NE WSTRETITSQ 2 NE TOLXKO USTANAWLIWATX PARAMETRY DLQ TEKSTOWOGO DEMONSTRATORA, NO 2 NE DOLVEN WSTRE^ATXSQ PRIZNAK KONCA STROKI 14 (MOVET ISPOLXZOWATXSQ TO- 2 NA^ALE SIMWOLXNU@ ZAPISX ^ISLA. 2 NAWLIWAETSQ NA POLE S NOMEROM, RAWNYM ZNA^ENI@ PEREMENNOJ 2 NATY LEWOGO WERHNEGO UGLA POLQ, 2 NATY ZADA@TSQ W ZNAKOMESTAH TEKU]EGO REVIMA I OTS^ITYWA@TSQ OT LEWOGO 2 NATAMI. kOORDINATY ZADA@TSQ W ATRIBUTNYH ZNAKOMESTAH I OTS^ITYWA@TSQ OT 2 NAQ KODIROWKA (O NA^ALXNYH USTANOWKAH SM. NIVE). kROME TOGO, W PROGRAMME 2 NAPE^ATAET 2 NABRATX W L@BOM TEKSTOWOM REDAKTORE, ISPOLXZU@]EM ALXTERNATIWNU@ KODI- 2 NABOR KOMAND. 2 NA WS@ OSTALXNU@ WYWODIMU@ NA \KRAN TEKSTOWU@ INFORMACI@. 2 NA SLEDU@]U@ - PRI 1 I T.D. kOLI^ESTWO METOK NE OGRANI^ENO. 2 NA SKOLXKO TO^EK DOLVEN BYTX SME]EN WYWODIMYJ TEKST WPRAWO (TO^NOE GORI- 2 NA 8 TO^KAM). sLEDUET U^ITYWATX, ^TO W REVIMAH 5 I 6 TEKST MOVET POZICI- 2 Mul C 8 2 Mul C 256 ( 2 MYE ZNA^ENIQ - OT 3 DO GRANIC \KRANA. pARAMETR <ATRIBUT> USTANAWLIWAET 2 MO]X@ KOMANDY 2 MOVNO MENQTX NEODNOKRATNO. 2 MOVNO I PROSTO WYWESTI ILL@STRACI@ NA \KRAN. pRI WYWODE POLE GRAFIKI 2 MONSTRACIONNU@ PROGRAMMU (ONA ZAPISANA W FAJLE 2 MOJ INFORMACII MOVET PROSTO NE HWATITX PAMQTI. wO WSEH SLU^AQH NEHWATKI 2 MLQET OKNO SPRAWA I SNIZU "TENX@". nAKONEC, SPECIFIKATOR 2 MIROWANIE NA ASSEMBLERE - WEDX ASSEMBLER, PO SUTI, TOVE KOMANDNYJ QZYK, 2 MI; \TI SOOB]ENIQ NUVNY PRAKTI^ESKI TOLXKO SOSTAWITEL@ PROGRAMMY, A KO- 2 MI, I BOLX[IMI LATINSKIMI BUKWAMI). kROME NEPOSREDSTWENNOGO UKAZANIQ 2 MI OT a DO 2 ME]ENIQ ZAGOLOWKA) (INWERTIROWANIE PROIZWODITSQ ATRIBUTNOE). 2 METR <NOMER> SOOB]AET NOMER SPRAJTA W FAJLE (W ODNOM FAJLE MOVET BYTX DO 2 MENTOW ^EREZ PSEWDO-FUNKCI@ 2 MELKOJ (W ODNU TO^KU) [AHMATNOJ SETKOJ. kOMANDA USTANAWLIWAET POLE WYWO- 2 ME TOGO, PRIBAWLQETSQ 64 DLQ POWY[ENIQ QRKOSTI I 128 DLQ MERCANIQ. 2 MALXNO DOPUSTIMOE ^ISLOWOE ZNA^ENIE - 65535. 2 MA DLQ 2 MA ZAWER[AETSQ I WYDAETSQ SOOTWETSTWU@]EE SOOB]ENIE (ESLI \TO RAZRE[ENO 2 Locate 0 0 3 2 LXKO 13), PO\TOMU PRI NABORE PROGRAMMY W 2 LQTX WLOVENNYH KONSTRUKCIJ IZ 2 LQET SOZDAWATX HORO[O OFORMLENNYE I ILL@STRIROWANNYE TEHNI^ESKIE OPISA- 2 LIWAET REVIM, PRI KOTOROM ^ASTX \KRANA, ZATIRAEMAQ OKNOM, SOHRANQETSQ W 2 LITX, UKAZAW SIMWOL 2 LITX NA DWA TIPA: O[IBKI INTERPRETATORA I O[IBKI DISKOWOJ OPERACIONNOJ 2 LITELEJ). pERWYJ SPRAJT (RASPOLAGA@]IJSQ W NA^ALE FAJLA) IMEET NOMER 0. 2 LEWOGO WERHNEGO UGLA \KRANA: 2 LENY POLQ W KOMANDE - SISTEMA SAMA RAZBERETSQ, KAKOE POLE PRAWEE, LEWEE, 2 LENNYH O[IBOK INTERPRETATORA W TOM, ^TO ONI WYWODQTSQ W OTDELXNOM OKNE 2 LE. pO [IRINE ILL@STRACIQ DOLVNA UME]ATXSQ W \KRANE, A PO WYSOTE ONA MO- 2 LE OT 0 DO STAROGO ZNA^ENIQ 2 L@STRACIQMI, KARTINKAMI I T.P., ISPOLXZUEMYE wA[EJ PROGRAMMOJ. zATEM PE- 2 L@BOJ IZ 256 SIMWOLOW, krome SIMWOLA S KODOM 24, KOTORYJ NI W KOEM SLU- 2 KeyPress C 2 KeyPress A 2 KWY. mETKA, KAK I KOMANDA, ZANIMAET OTDELXNU@ STROKU TEKSTA. eSLI W TEK- 2 KWADRATNYE SKOBKI, NAPRIMER: 2 KRAJNEJ MERE DLQ PROGRAMMY) - I NE BUDETE ZNATX PROBLEM. eSTX E]E ODIN 2 KOW, W KOTORYH ISPOLXZOWANIE BEZUSLOWNOGO PEREHODA S^ITAETSQ NEDOSTAT- 2 KONCE STROKI, MEVDU PARAMETRAMI, PERED KOMANDOJ I T.D. pOSKOLXKU WNUTRI 2 KOMPX@TER WSE RAWNO SBROSITSQ. nIVE PERE^ISLENY WSE WOZMOVNYE SOOB]ENIQ 2 KOMMENTARIQ IGNORIRU@TSQ I PEREHODY NA NOWU@ STROKU, MOVNO ODNU KOMANDU 2 KOMANDY. pROGRAMMIROWANIE NA TAKIH QZYKAH NESKOLXKO NAPOMINAET PROGRAM- 2 KOMANDY. 2 KOMANDY, KOTORYE DEMONSTRATOR DOLVEN WYPOLNQTX. pRI^EM \TI KOMANDY MOGUT 2 KOMANDY OKON^ITSQ, A PEREMENNAQ 2 KOMANDU 2 KOMANDOJ 2 KOM, W QZYKE 2 KOLXKO [RIFTOW, NASTRAIWAEMYE CWETA, SREDSTWA WYDELENIQ OTDELXNYH SLOW; 2 KOLI^ESTWU UME]A@]IHSQ SIMWOLOW. 2 KODIROWKI PROSMATRIWAEMOGO \TOJ KOMANDOJ TEKSTA, OBQZATELXNO POSLE 2 KLAWI[I 2 KLAWI[. 2 KIE-LIBO NEQSNOSTI S SINTAKSISOM, IZU^ITE WHODQ]U@ W SOSTAW PAKETA DE- 2 KI, 128 - PEREKL@^ENIE NA RUSSKIJ ZNAKOGENERATOR, 129 - NA LATINSKIJ. 2 KI PRIHODITSQ SKANIROWATX WESX TEKST PROGRAMMY. 2 KEYPRESS 2 KAKAQ-LIBO KLAWI[A, I 0 W PROTIWNOM SLU^AE. wYPOLNENIE PROGRAMMY NE ZA- 2 KA POLXZOWATELX NE NAVMET KAKU@-LIBO KLAWI[U. pRIME^ANIE: PO TEHNI^ESKIM 2 If var B=7 2 If var B=32 2 If var B=15 2 If var B=14 2 If var B=13 2 If not C=0 2 If not A=7 2 If X>89 2 If Var B=12 2 If L="" 2 If I<12 2 If E=64 2 If C<20 2 If B=32 2 If B<16 2 If B<10 2 If A=26 2 If A<26 2 IZ KOMANDY 2 ITX REZULXTAT \TOJ VE PEREMENNOJ. zAEM IGNORIRUETSQ, T.E. ESLI IZ 0 WY- 2 ITOGE K WYHODU IZ SISTEMY. 2 INTERPRETATORA. eSLI DANNYJ REVIM WKL@^EN, PRI OBNARUVENII PROGRAMMNOJ 2 IMENI, K PEREMENNYM MOVNO ADRESOWATXSQ KAK K ODNOMU MASSIWU IZ 26 \LE- 2 ILI NIVN@@ GRANICU POLQ, NE MOVET BYTX UDALENA IZ PAMQTI DLQ EE OSWOBOV- 2 ILI STRANICU, A TAKVE W NA^ALO I W KONEC TEKSTA. pEREME]ENIE NA STROKU 2 IGNORIRUETSQ. pARAMETRY 2 I po KOTOROMU PROIZWODITSQ PE^ATX TEKSTA, I ATRIBUT PE^ATI, USTANAWLIWA- 2 I STRO^NYMI BUKWAMI, PO\TOMU KOMANDY MOVNO PISATX, WYDELQQ NA^ALA OBRA- 2 I ESLI EGO NE NAHODIT, WYDAET SOOTWETSTWU@]EE SOOB]ENIE I ZAWER[AET SWO@ 2 I PROIZWODITX DRUGIE POLEZNYE DEJSTWIQ - NAPRIMER, RISOWATX OKNA, OR- 2 I NE ISPOLXZOWALA, KROME SEBQ I \KRANA, NIKAKOJ PAMQTI. pRIME^ANIE: PRI 2 HWATAET SWOBODNOJ PAMQTI, FAJLY (\TO OTNOSITSQ NE TOLXKO K FAJLAM ILL@S- 2 HRANQLASX, ONA BUDET WOSSTANOWLENA. (pODROBNEE SM. OPISANIE KOMANDY 2 HRANQEMOJ KOMANDOJ 2 GraphOutSpace I I A B 2 GoTo mn1 2 GoTo d5 2 GoTo d4 2 GoTo d3 2 GRANICY TEKU]EGO POLQ WYWODA SODERVIMOE POLQ SKROLLIRUETSQ WWERH. 2 GLAWE "tEHNI^ESKIE PODROBNOSTI"). kAVDAQ KOMANDA ZANIMAET OTDELXNU@ 2 GI^ESKOM KONCE PROGRAMMY (SM. TAKVE GLAWU "sOOB]ENIQ OB O[IBKAH"). 2 GDE \TO NEDOPUSTIMO. 2 GDE ON DOLVEN NAHODITXSQ PO PRAWILAM; NAPRIMER, W KONSTRUKCII 2 GDA ILL@STRACIQ POLNOSTX@ ZATIRAET \TOT TEKST. tAKOE OGRANI^ENIE SWQZANO 2 GDA PROGRAMMA OTLAVENA, GENERACI@ SOOB]ENIJ LU^[E WYKL@^ITX). eSLI VE 2 GANIZOWYWATX MEN@, DEMONSTRIROWATX KARTINKI I T.P. tAKIM OBRAZOM, DEMON- 2 FORMACII. dRUGIMI SLOWAMI, 2 FIKATORY ZAPISYWA@TSQ PO TEM VE PRAWILAM, ^TO I KOMANDY. w \TOM SLU^AE 2 FAJLOW NEUDOBNO DLQ POLXZOWATELQ, T.K. NE U KAVDOGO MOVET BYTX SOOTWET- 2 FAJL SPECIALXNOGO FORMATA, W KOTOROM UKAZYWAET WSE NEOBHODIMYE PARAMET- 2 ESLI TAKAQ STROKA POLU^AETSQ W REZULXTATE SLIQNIQ STROK KOMANDOJ 2 EMYJ KOMANDOJ 2 EM LOGI^ESKOGO WYRAVENIQ. zNA^ENIE OPERACIJ SRAWNENIQ OBY^NOE: = - RAW- 2 EE WYZOWA INWERTIROWANO KAKOE-LIBO POLE OT PREDYDU]EGO MEN@; PO\TOMU 2 Drive X: disk not present{TextAttr OFF} 2 Div B 256 ( 2 Div A 10 ( 2 Disk error{TextAttr OFF} 2 DRUGIMI. 2 DO ZAKRYWA@]EJ SKOBKI ')'. kOMMENTARII MOGUT RASPOLAGATXSQ GDE UGODNO: W 2 DO SLEDU@]EJ TAKOJ VE KOMANDY. tAK, W DANNOM PRIMERE DLQ WSEGO POSLEDU@- 2 DLQ DEMONSTRATORA - OKNO WYWODA, IMQ DEMONSTRIRUEMOGO FAJLA, [RIFT, CWE- 2 DLQ REVIMA 5 I NA 3/4 DLQ REVIMA 6. pOLU^ENNOE ZNA^ENIE I BUDET RAWNO 2 DLENNEE, T.K. ON PRI \TOM PEREKODIRUETSQ W ALXTERNATIWNU@ KODIROWKU. 2 DISKA, W SISTEME PRIMENENO K\[IROWANIE DISKA. |TO OZNA^AET, ^TO POKA 2 DINATY 0,0). <SDWIG> PRIMENIM TOLXKO DLQ REVIMOW 5 I 6 I USTANAWLIWAET, 2 DERVIWAETSQ; KLAWI[I 2 DENIQ. |TO VE OTNOSITSQ I KO WSEJ WY[EPERE^ISLENNOJ REZIDENTNOJ INFOR- 2 DE, W KAKOM ONI ESTX, NAPRIMER: 2 DATX OVIDAEMOGO REZULXTATA. tAK, NAPRIMER, NESKOLXKO SLEDU@]IH ODIN ZA 2 DANNOJ KOMANDOJ. 2 DAH WWODA. 2 DA@TSQ W ATRIBUTNYH ZNAKOMESTAH OTNOSITELXNO LEWOGO WERHNEGO UGLA \K- 2 DA RAZMEROM WO WESX \KRAN (WYPOLNQETSQ 2 DA NEOPOZNANA ILI ZAPRE]ENA K ISPOLXZOWANI@ WNUTRI TEKSTA, SKOBKI I 2 Command 68 " 2 Command ( 2 Code var B K 2 ClSpc 0 2 CWETAMI, A S UKAZANNYM ATRIBUTOM. sPECIFIKATOR 2 CWETA OKNA I STANOWITSQ TEKU]IM ATRIBUTOM. sPECIFIKATOR tor UKAZYWAET, 2 CS/T - T. 2 CIONALXNO RASSTOQNI@ OT NA^ALA TEKSTA DO METKI, T.K. W POISKAH \TOJ MET- 2 CIALXNYJ OKONNYJ STEK. bLAGODARQ \TOMU MOVNO ORGANIZOWATX IERARHI^ESKU@ 2 CE, ALT/ASCII, LINELEN, SOUND, BREAK, ERROR, 2 BYTX KAK KOD 13, TAK I PARA 13/10 (A PRI KODIROWKE 2 BUTOM (ILI TEKU]IM, ESLI NE ATRIBUT NE UKAZAN). uKAZANNYJ ATRIBUT STANO- 2 BUFERE TREBUEMYJ FAJL, I ESLI \TO TAK, FAJL ZAGRUVAETSQ PRQMO IZ PAMQTI. 2 BUDTO BYLA ISPOLNENA SLEDU@]AQ PROGRAMMA: 2 BUDET WYWEDENA NA \KRAN W TOM WIDE, KAK ONA ESTX. oDNAKO SLEDUET U^ESTX, 2 BUDET WOSSTANOWLENO. 2 BUDET PE^ATATXSQ BEZ ATRIBUTOW, T.E. SIMWOLY BUDUT PRINIMATX CWET, KOTO- 2 BUDEM S^ITATX OKON^ENYM. sMELO PRISTUPAJTE K RABOTE I NE STESNQJTESX 2 BSTWENNO PROSMOTRU TEKSTA. pERED WYZOWOM DEMONSTRATORA, KOMANDAMI 2 BREAK. Press any key to re- 2 BLOKIROWANO. 2 BEZ POKAZA FRAGMENTA LISTINGA I ^TO IH WYWOD NELXZQ ZAPRETITX KOMANDOJ 2 BELOM (ILI PROBELAMI). iNTERPRETATOR NE DELAET RAZLI^IJ MEVDU PROPISNYMI 2 AWTOR TEKSTA, A NE POLXZOWATELX, DLQ KOTOROGO \TOT TEKST PREDNAZNA^EN. 2 ARIFMETI^ESKOE SLOVENIE PO MODUL@ 65536, PEREPOLNENIE IGNORIRUETSQ. wO 2 ALXNYJ FAJL DOLVEN PREDSTAWLQTX SOBOJ OBY^NYJ TEKST, W KOTOROM ZAPISANY 2 @]IM WNUTRENNIM (PROGRAMMNYM) KOMANDAM (\TO, SOBSTWENNO, PROSTO ODNI I 2 <x>, <y> 2 <x2>, <y2> 2 <[IRINA> I <WYSOTA> ZADA@T SOOTWETSTWENNO [IRINU I WYSOTU OKNA, DOPUSTI- 2 9999 RANDOMIZE USR 65154 2 9900 BEEP .5,30: PAUSE 0 2 9800 LPRINT CHR$ 12; 2 8, ATRIBUTY DOLVNY PRISUTSTWOWATX I DLQ "LI[NIH" TO^EK. nAPRIMER, PRI 2 65535), 2 426063, 2 256 ODNOTIPNYH SPRAJTOW; ONI DOLVNY SLEDOWATX ODIN ZA DRUGIM BEZ RAZDE- 2 ------------------------------------------------------------------------ 2 - W TO^KAH. sISTEMA WYWODIT SPRAJTY, ZAKODIROWANNYE W SAMOM RASPROSTRA- 2 - DOWOLXNO "MEDLENNAQ" KOMANDA, PRI^EM WREMQ EE ISPOLNENIQ PRQMO PROPOR- 2 (fUNKCI@ OPROSA KLAWI[I 2 (T.E. WYBRANNOGO) POLQ. pRI NAVATII KLAWI[I wyhod \TA PEREMENNAQ POLU^IT 2 (PRI \TOM ONO INWERTIRUETSQ), PRI^EM NEWAVNO, W KAKOM PORQDKE PERE^IS- 2 (OTKL@^ENIE FUNKCII WYHODA) 2 (ONI PROSTO PEREHWATYWA@TSQ SISTEMOJ rm), SOOTWETSTWU@]IE SOOB]ENIQ WY- 2 (KROME RAZDELITELEJ - PROBELA, KONCA STROKI I T.P.). oPREDELQETSQ METKA 2 (ESLI MENX[E LIBO RAWNO ...) 2 "STARYE" FAJLY. kAVDAQ KOMANDA ZAGRUZKI PROWERQET, NE NAHODITSQ LI UVE W 2 "RASTQNUTX" NA NESKOLXKO STROK: 2 {Mode 6} 2 {Mode 5} 2 {Command "name" 4 R }{Mode 8}{TextAttr OFF} 2 Window 2 5 20 7 15 2 Window 19 11 4 3 32 Shade Store 2 Window 0 0 32 24 41 Top 2 Val B B ( 2 UpCase N ( 2 UpCase L 2 TextView "pmhelp1" 2 TextOutSpace 1 1 9 9 2 TextOutSpace X 1 30 21 2 TextAttr OFF 2 TextAttr 105 (105=64+5*8+1 - 2 Sub A 68 ( 2 SprView "demo1p" 11 9 4 32 0 5 2 SprView "Exolon 1" 20 17 3 40 1 2 Sound ON 2 Sound OFF 2 Set var T var S 2 Set var K "string" 2 Set X 4 2 Set S "D" 2 Set R 1234 2 Set N " 2 Set L "Presentation " 2 Set I R 2 Set G 2 2 Set B "12345Ni" 2 Set A 35 2 Set A 123 2 Set A 100 2 Set A 1 2 Scroll Up 2 Scroll Down 2 ScrView "screen" 56 2 ScrView "dizzy1" Compressed 2 ScrView "demo1s" 2 ReadNum T 2 ReadNum L 2 Read S 2 Read N 2 Read L 2 Read K 2 Random R 2 Random A 2 PutPic "F1B" 4 12 2 Print "HET" 2 Pause 50 ( 2 Pause 3000 key ( 2 Pause 1 key ( 2 Pause 0 ( 2 Pause ( 2 PUTPIC < 2 PRESENTATION MASTER 2 POMO]X@ 2 On G GoTo exit m1 m2 m3 m4 2 Mul A 321 ( 2 Mode 6{Mode 8} 2 Menu A 0 1 4 0 2 5 2 MENU <vnum> <x1:num> <y1:num> 2 Locate 7 2 2 2 Locate 21 15 2 LineLen 8 2 KeyPress F 2 Key QUIT ( 2 Key Left o 5 \8 ( 2 Key FIRE \13\32\K ( 2 Key Down axk ( 2 If not K>32768 ( 2 If L=" 2 If K < 12 2 If F="y" 2 If C="y" 2 If A=17 2 IF [NOT] <num1> < | = | > <num2>{Mode 8}{TextAttr OFF} 2 GraphOutSpace 1 1 30 22 2 GoTo Label@1 2 Error on 2 Error off 2 DelWin 2 DelBar 2 DISTRIBUTED BY INFORCOM 2 Code S S ( 2 Code K K 2 Code A "1.0R" ( 2 ClSpc 32 2 Chain N 2 Chain "Manual" 2 CLS Gird 2 CLS 56 Gird 2 CLS 15 2 Break On 2 Break Off 2 Border 1 2 Ask K ( 2 Add L "Master" ( 2 Add A 15 ( 2 ADD <vstr> <str>{Mode 8}{TextAttr OFF} 2 :Label@1 2 dLQ WYHODA 2 UP - 2 RIGHT - 2 QUIT - 2 LEFT - 2 HOME - 2 FIRE - 2 END - 2 DOWN - 2 121019, 2 . . . 2 Window 0 1 32 22 15 2 Sub D 1 2 Set L "Sp" 2 Set L "Gr" 2 Set L "Ex" 2 Set L "En" 2 Set L "Ed" 2 Set L "Dl" 2 Set E 0 2 Set D 0 2 Set B 0 2 Set A 4 2 Set A 24 2 Print L 2 Print K 2 Print " 2 Pause 3 2 Mode 8 2 Mode 5 2 If D=0 2 If B<19 2 If A>1 2 GoTo dsy 2 GoTo dsx 2 Drum 2 DelWin 2 Add C 7 2 8 8 PPPXPPPPPPX@x 2 '|', 2 Set A 34 2 Random A 2 If A<7 2 End 2 8 2 ( C="y", not A<7 2 ~TOBY NE PEREGRUVATX OKONNU@ SISTEMU I NE SOZDAWATX POBO^NYH \FFEK- 2 ~TOBY BYLO PRO]E RAZOBRATXSQ W ISPOLXZOWANII KOMAND, POSLE IH OPI- 2 |END|QUIT [< 2 {TextAttr 185}( 2 {TextAttr 130} 2 wY^ESTX IZ ZNA^ENIQ PEREMENNOJ ZNA^ENIE WTOROGO PARAMETRA I PRISWO- 2 wYWODITSQ, KOGDA KOMANDA 2 wYWODITSQ, ESLI UKAZANNYJ W KOMANDE FAJL NE NAJDEN NA DISKE. 2 wYWODITSQ, ESLI KOMANDE NE HWATAET PARAMETROW. 2 wYWODITSQ PRI POPYTKE ISPOLXZOWATX KONSTANTU TAM, GDE TREBUETSQ PE- 2 wYWOD GRAFI^ESKOGO IZOBRAVENIQ IZ FAJLA <IMQ 2 wYPOLNITX BEZUSLOWNYJ PEREHOD NA UKAZANNU@ METKU. iMQ METKI MOVET 2 wYDERVATX PAUZU PRODOLVITELXNOSTX@ <WREMQ>/50 SEKUNDY. eSLI <WREMQ> 2 wSTAWITX W TEKST ILL@STRACI@, SOZDANNU@ UTILITOJ 2 wSE PARAMETRY OKNA (W TOM ^ISLE I POZICIQ PE^ATI) POME]A@TSQ W SPE- 2 wSE O[IBKI, OPREDELQEMYE SISTEMOJ 2 wOZNIKAET, ESLI W KOMANDE UKAZANO BOLX[E PARAMETROW, ^EM NUVNO. 2 wOZNIKAET, KOGDA OBRABATYWAEMAQ KOMANDOJ 2 wOZNIKAET PRI POPYTKE ISPOLXZOWANIQ KOMANDY 2 wOZNIKAET PRI NEWOZMOVNOSTI OPREDELITX SMYSL KOMANDY ILI PARAMETRA. 2 wOZNIKAET W NEKOTORYH SLU^AQH, KOGDA ^EREZ PEREMENNU@ PEREDAETSQ 2 wOZNIKAET PRI RASPOLOVENII DOPUSTIMOGO PARAMETRA W KOMANDE NE TAM, 2 wOZNIKAET PRI POPYTKE ZAPISI SPECIFIKATORA ILI PEREMENNOJ NA MESTO 2 wOZNIKAET PRI POPYTKE WYPOLNENIQ ODNOJ OPERACII NAD PARAMETRAMI 2 wOSSTANOWITX INWERTIROWANNOE KOMANDOJ 2 wKL@^ITX KODIROWKU TEKSTA, PRIMENQEMU@ W REDAKTORE 2 wKL@^ITX ILI WYKL@^ITX (SOOTWETSTWENNO 2 wKL@^ITX ILI WYKL@^ITX 2 wKL@^ITX (PRI PARAMETRE 2 wKL@^ITX ALXTERNATIWNU@ KODIROWKU TEKSTA. dEJSTWUET KAK NA TEKST, 2 wERNUTXSQ K PREDYDU]EMU OKNU. pARAMETRY PREDYDU]EGO OKNA SNIMA@TSQ 2 w SWOIH PROGRAMMAH wY MOVETE ISPOLXZOWATX PEREMENNYE, KOTORYE MOGUT 2 w PROGRAMMU MOVNO WSTAWLQTX KOMMENTARII W KRUGLYH SKOBKAH. eSLI IN- 2 w L@BOM SLU^AE, W PAMQTI POLNOSTX@ DOLVNY UME]ATXSQ ISPOLNQEMAQ 2 uSTANOWITX TEKU]EE POLE WYWODA DLQ TEKSTA. kOORDINATY POLQ ZADA@TSQ 2 uSTANOWITX POLE WYWODA GRAFIKI W SOOTWETSTWII S UKAZANNYMI KOORDI- 2 uSTANOWITX FLAG RAZRE[ENIQ INTERPRETACII W SOOTWETSTWII SO ZNA^ENI- 2 uSTANOWITX REVIM PE^ATI TEKSTA W SOOTWETSTWII SO ZNA^ENIEM 2 uSTANOWITX CWET BORD@RA \KRANA RAWNYM ZNA^ENI@ <CWET>. dOPUSTIMYE 2 uSTANOWITX ATRIBUT PE^ATI TEKSTA. eSLI ZADAN PARAMETR 2 uMNOVITX ZNA^ENIQ PARAMETROW I PRISWOITX REZULXTAT PEREMENNOJ. eSLI 2 tREBUETSQ PEREMENNAQ 2 tREBUETSQ PARAMETR 2 tREBUETSQ KOMANDA 2 tREBUEMYJ OB_EM ozu KOMPX@TERA, kB ............................ 48 2 tEPERX PEREJDEM K OPISANI@ KOMAND 2 tEPERX PEREJDEM K DISKOWYM O[IBKAM. oSNOWNOE IH OTLI^IE OT PERE^IS- 2 tEKST DLQ PROSMOTRA NABIRAETSQ W L@BOM IME@]EMSQ TEKSTOWOM REDAKTO- 2 tAK RODILSQ QZYK 2 tAK ^TO MOJ wAM SOWET: ISPOLXZUJTE ALXTERNATIWNU@ KODIROWKU (PO 2 t.K. POLE WYWODA TEKSTA ZADAETSQ W ZNAKOMESTAH REVIMA 8, WOZNIKAET 2 sLOVITX ZNA^ENIQ PEREMENNOJ I WTOROGO PARAMETRA I PRISWOITX REZULX- 2 sLI[KOM DLINNAQ STROKA 2 sKROLLIROWATX TEKU]EE POLE WYWODA TEKSTA WWERH PRI PARAMETRE 2 sISTEMA SAMA NE OPREDELQET ISPOLXZUEMU@ KODIROWKU TEKSTA, EE NUVNO 2 sINTAKSI^ESKAQ O[IBKA 2 sBROS SISTEMY. pOSLE INICIALIZACII ZAPUSKAETSQ 2 rEVIM PRERYWANIJ .................................. WKL@^ENY, 2 rAZRE[ITX INTERPRETACI@. pODROBNEE SM. 2 rAZDELITX ZNA^ENIE PEREMENNOJ NA ZNA^ENIE WTOROGO PARAMETRA I PRI- 2 qZYK 2 pRO^ITATX STROKU S KLAWIATURY, PEREWESTI EE W ^ISLO I POMESTITX \TO 2 pRO^ITATX STROKU S KLAWIATURY I ZAPISATX EE W PEREMENNU@ 2 pROGRAMMA NA 2 pRIWESTI WSE BUKWENNYE SIMWOLY W STROKE 2 pRISWOITX PEREMENNOJ 2 pRISWOITX PEREMENNOJ 2 pRI KODIROWKE 2 pRI ZAPUSKE SISTEMY USTANAWLIWA@TSQ TAKIE NA^ALXNYE PARAMETRY, KAK 2 pRI PROSMOTRE MOVNO PEREME]ATXSQ PO TEKSTU WWERH I WNIZ NA STROKU 2 pRI OBDUMYWANII \TOJ ZADA^I WSTAL WOPROS, KAK ZADAWATX PARAMETRY 2 pRI ISPOLXZOWANII ALXTERNATIWNOJ KODIROWKI W TEKST MOVNO WKL@^ATX 2 pOQWLQETSQ PRI POPYTKE ISPOLXZOWANIQ NEOPREDELENNOJ PEREMENNOJ TAM, 2 pOQWLQETSQ WO WSEH SLU^AQH, KOGDA UKAZANNYJ PARAMETR NE UDOWLETWO- 2 pOQWLQETSQ PRI POPYTKE ZAKRYTIQ OKNA KOMANDOJ 2 pOQWLQETSQ PRI NEHWATKE PAMQTI DLQ ZAGRUVAEMOGO FAJLA ILI DLQ SO- 2 pOKAZATX TEKST, ZAPISANNYJ W FAJLE S UKAZANNYM IMENEM. |TO SAMAQ 2 pOKAZATX SPRAJT, ZAPISANNYJ W UKAZANNOM FAJLE. kOORDINATY WYWODA 2 pOKAZATX ILL@STRACI@, ZAPISANNU@ W UKAZANNOM FAJLE (FAJL IMEET RAS- 2 pO STRUKTURE 2 pE^ATATX NA \KRAN W TEKU]EE POLE WYWODA ZNA^ENIQ PARAMETROW. kOLI- 2 pEREWESTI STROKU 2 pEREMESTITX POZICI@ PE^ATI W ZNAKOMESTO S KOORDINATAMI 2 pEREMESTITX POZICI@ PE^ATI NA NOWU@ STROKU. pRI DOSTIVENII NIVNEJ 2 pEREJTI NA METKU S NOMEROM, RAWNYM ZNA^ENI@ 2 pEREDATX UPRAWLENIE PROGRAMME, ZAPISANNOJ W FAJLE S UKAZANNYM IME- 2 pARAMETR NE NA MESTE 2 pAKET PROGRAMM, KOTORYJ Q IME@ ^ESTX wAM PREDSTAWITX, NAZYWAETSQ 2 o^ISTITX \KRAN I ZAKRASITX EGO UKAZANNYM ATRIBUTOM (ESLI ATRIBUT NE 2 o^ISTITX TEKU]EE POLE WYWODA TEKSTA I ZAKRASITX EGO UKAZANNYM ATRI- 2 o[IBKA W ZAPISI ^ISLA 2 oTSUTSTWUET DISK W DISKOWODE h: 2 oSOBOE WNIMANIE UDELENO POKAZU TEKSTOW. sOBSTWENNO, WNA^ALE Q I HO- 2 oRGANIZOWATX MEN@ W SOOTWETSTWII S PARAMETRAMI. kOMANDE W KA^ESTWE 2 oPREDELITX KLAWI[I WYPOLNENIQ UKAZANNOJ FUNKCII DLQ KOMAND 2 oKNO NE OTKRYTO 2 oGRANI^ITX BUFER WWODA DLQ KOMANDY 2 oBLASTX PAMQTI, ZANIMAEMAQ SISTEMOJ rm .............. 24576..42524 2 nE^ISLOWAQ PEREMENNAQ 2 nEZAWISIMO OT PRIMENQEMOJ KODIROWKI, PRIZNAKOM KONCA STROKI MOVET 2 nET RAMKI NA \KRANE 2 nESOWMESTIMYE PEREMENNYE 2 nEOPREDELENNAQ PEREMENNAQ 2 nEKOLXKO OGRANI^ENIJ NAKLADYWAETSQ NA FAJL, SODERVA]IJ PROGRAMMU. 2 nEDOPUSTIMYJ SPECIFIKATOR 2 nEDOPUSTIMYJ PARAMETR 2 nAVATA KLAWI[A 2 nARISOWATX OKNO W SOOTWETSTWII S PARAMETRAMI. kOORDINATY I RAZMERY 2 nAPOSLEDOK - ODIN SOWET. nE ZLOUPOTREBLQJTE PEREKL@^ENIEM CWETOW I 2 nA \TOM wA[E NA^ALXNOE ZNAKOMSTWO S SISTEMOJ 2 mETKA NE NAJDENA 2 mALO PAMQTI 2 mAKSIMALXNOE KOLI^ESTWO ODNOWREMENNO OTKRYTYH OKON ............ 14 2 mAKSIMALXNOE KOLI^ESTWO FAJLOW, HRANIMYH W K\[-PAMQTI ......... 25 2 lI[NIJ PARAMETR 2 kONEC PROGRAMMY. eSLI INTERPRETATOR WSTRE^AET \TU KOMANDU, PROGRAM- 2 kOLI^ESTWO [RIFTOW .............................. 3 H 256 SIMWOLOW 2 kOLI^ESTWO WYPOLNQEMYH KOMAND ................................. 51 2 kOLI^ESTWO TIPOW DANNYH ........................................ 2 2 kOLI^ESTWO SWOBODNOJ PAMQTI, BAJT .......................... 23011 2 kOLI^ESTWO SLUVEBNYH SLOW, WOSPRINIMAEMYH INTERPRETATOROM ..... 91 2 kOLI^ESTWO PEREMENNYH ......................................... 26 2 kAVDOJ FUNKCII MOVNO OPREDELITX NE BOLEE TREH KLAWI[. kLAWI[I UKA- 2 kAK UVE NE RAZ OTME^ALOSX, PROGRAMMU I DEMONSTRIRUEMYJ TEKST MOVNO 2 k ISPOLXZOWANI@ W TEKSTE RAZRE[ENO TOLXKO TRI KOMANDY: 2 k DISKOWYM O[IBKAM HOTX I S NATQVKOJ, NO MOVNO OTNESTI PREDUPREVDE- 2 iTAK, CELX BYLA QSNA - NAPISATX DEMONSTRATOR TEKSTOW, POZWOLQ@]IJ 2 iNWERTIROWATX FLAG RAZRE[ENIQ INTERPRETACII. eSLI RANX[E INTERPRE- 2 iMEET MESTO PRI POPYTKE OPREDELENIQ STROKI DLINNEE 62 SIMWOLOW, ILI 2 iMEET MESTO PRI ISPOLXZOWANII SPECIFIKATORA, NE PREDUSMOTRENNOGO 2 gENERIROWATX [UMOWOJ \FFEKT PRODOLVITELXNOSTX@ OKOLO 0.1 SEK. 2 gENERIROWATX ZWUKOWOJ TON DLITELXNOSTX@ OKOLO 0.5 SEK. 2 gENERIROWATX KOROTKIJ ]EL^OK. 2 gENERACI@ SOOB]ENIJ OB O[IBKAH INTERPRETATORA MOVNO OTKL@^ITX S PO- 2 fAJL NE NAJDEN 2 eSLI wY HOTITE SOZDATX AWTOSTARTU@]U@ DEMONSTRACI@ NA OTDELXNOM DI- 2 eSLI S LOGIKOJ RABOTY DEMONSTRATORA wAM WSE PONQTNO, PEREJDEM K SO- 2 dLQ ZAPUSKA SISTEMY 2 dLQ TOGO, ^TOBY NE ZADERVIWATX PROSMOTR POSTOQNNYMI ZAGRUZKAMI S 2 dLQ NA^ALA OBGOWORIM NEKOTORYE SOGLA[ENIQ. pUSTX W DALXNEJ[EM 2 dISKOWAQ O[IBKA. wOZNIKAET PRI WSEH OSTALXNYH O[IBKAH 2 dEMONSTRACIQ TEKSTOW QWLQETSQ, POVALUJ, SAMOJ GLAWNOJ FUNKCIEJ SIS- 2 bOLX[IE WOZMOVNOSTI PO OFORMLENI@ TEKSTA PREDOSTAWLQ@T WSTRAIWAEMYE 2 Window 2 5 20 7 15 2 Window 19 11 4 3 32 Shade Store 2 Window 0 0 32 24 41 Top 2 WINDOW <x:num> <y:num> 2 Val B B 2 VAL <var> <str> 2 UpCase N 2 UpCase L 2 UPCASE <vstr> 2 U NEKOTORYH KOMAND ESTX PARAMETRY-SPECIFIKATORY (^A]E NEOBQZATELX- 2 TextView "pmhelp1" 2 TextOutSpace 1 1 9 9 2 TextOutSpace X 1 30 21 2 TextAttr 105 2 TEXTVIEW 2 TEXTOUTSPACE <x1:num> <y1:num> <x2:num> <y2:num> 2 TEXTATTR OFF| 2 Sub A 68 2 SprView "demo1p" 11 9 4 32 0 5 2 SprView "Exolon 1" 20 17 3 40 1 2 Sound OFF 2 Set var T var S 2 Set var K "string" 2 Set X 4 2 Set S "D" 2 Set R 1234 2 Set N 2 Set L "Presentation " 2 Set I R 2 Set G 2 2 Set B "12345Ni" 2 Set A 35 2 Set A 128 2 Set A 123 2 Set A 100 2 Set A 1 2 Scroll Up 2 Scroll Down 2 ScrView "screen" 56 2 ScrView "dizzy1" Compressed 2 ScrView "demo1s" 2 SUB <vnum> <num> 2 SPRVIEW 2 SOUND ON|OFF 2 SET <var> <num>|<str> 2 SCRVIEW 2 SCROLL UP|DOWN 2 ReadNum T 2 ReadNum L 2 Read S 2 Read N 2 Read L 2 Read K 2 Random R 2 Random A 2 READNUM <var> 2 READ <var> 2 RANDOM <vnum> 2 Quit 2 QUIT 2 PutPic "F1B" 4 12 2 Print "HET" 2 Pause 50 2 Pause 3000 key 2 Pause 1 key 2 Pause 0 2 Pause 2 PRINT [<num1>|<str1>] [<num2>|<str2>] ... 2 PAUSE [ 2 On G GoTo exit m1 m2 m3 m4 2 ON <num> GOTO 2 Mul A 321 2 Mode 6 2 Mode 5 2 Menu A 0 1 4 0 2 5 2 MUL <vnum> <num> 2 MODE <num> 2 MENU <vnum> <x1:num> <y1:num> 2 Locate 7 2 2 2 Locate 21 15 2 LineLen 62 2 LineLen 8 2 LOCATE <x:num> <y:num> [ 2 LINELEN <num> 2 KeyPress F 2 Key UP q i 9 2 Key RIGHT p l 7 2 Key QUIT \7 \14 2 Key QUIT 2 Key Left o 5 \8 2 Key LEFT o j 6 2 Key HOME Q \11 2 Key FIRE \13\32\K 2 Key FIRE 0 \32 \13 2 Key END A \10 2 Key Down axk 2 Key DOWN a k 8 2 KEYPRESS <var> 2 KEY UP|DOWN|LEFT|RIGHT|FIRE|HOME|END|QUIT [ 2 If not K>32768 2 If L= 2 If K < 12 2 If F="y" 2 If C="y" 2 If A=17 2 IF [NOT] <str1> = <str2> 2 IF [NOT] <num1> < | = | > <num2> 2 GraphOutSpace 1 1 30 22 2 GraphOutSpace 0 0 31 23 2 GoTo Label@1 2 GRAPHOUTSPACE <x1:num> <y1:num> <x2:num> <y2:num> 2 GOTO 2 Error on 2 Error off 2 Error ON 2 ESLI W KOMANDE WOZMOVEN WYBOR ODNOGO IZ WARIANTOW, TO \TI WARIANTY 2 ESLI KAKOJ-LIBO PARAMETR QWLQETSQ NEOBQZATELXNYM, ON ZAKL@^AETSQ W 2 ESLI W KOMANDE TREBUETSQ UKAZATX NAZNA^ENIE KONKRETNOGO PARAMETRA, 2 ERROR ON|OFF 2 ENDIF 2 END 2 ELSE 2 Drum 2 Drive X: disk not present 2 Div A 10 2 Disk error 2 DelWin 2 DelBar 2 DRUM 2 DIV <vnum> <num> 2 DELWIN 2 DELBAR 2 Code S S 2 Code K K 2 Code A "1.0TR" 2 Click 2 ClSpc 32 2 ClSpc 2 Chain N 2 Chain "Manual" 2 CODE <var> <str> 2 CLSPC [ 2 CLS [ 2 CLS Gird 2 CLS 56 Gird 2 CLS 56 2 CLS 15 2 CLS 2 CLICK 2 CHAIN 2 Break On 2 Break Off 2 Break ON 2 Border 7 2 Border 1 2 Beep 2 BREAK. Press any key to reset 2 BREAK ON|OFF 2 BORDER 2 BEEP 2 Ask K 2 Ask K 2 Ask F 2 Ask C 2 Add L "Master" 2 Add A 15 2 ASK <var> 2 ALT 2 ADD <vstr> <str> 2 ADD <vnum> <num> 2 :METKA 2 :Label@1 2 - OTLI^ALSQ WYSOKIM KA^ESTWOM ISPOLNENIQ. 2 - IMEL UDOBNOE UPRAWLENIE (VELATELXNO PERENASTRAIWAEMOE) - PEREME- 2 - IMEL RAZWITYE SREDSTWA WYWODA: PE^ATX W OKNO L@BYH RAZMEROW, NES- 2 - ESLI \TO NE SLI[KOM SLOVNO, POZWOLQL WSTAWLQTX W TEKST ILL@STRA- 2 - BYL UNIWERSALXNYM, T.E. "PONIMAL" BY TEKSTY RAZLI^NYH TEKSTOWYH 2 tEHNI^ESKIE PODROBNOSTI 2 Set D 1 2 Set A 3 2 QUIT 2 HOME 2 GoTo EaRet 2 FIRE 2 END 2 Add A 21 2 ) 68 ( 2 ) " 2 set{TextAttr OFF} 2 sOOB]ENIQ OB O[IBKAH 2 62 2 0 654 009543{TextAttr OFF}; 2 "Presentation Master") 2 ""{TextAttr OFF} ( 2 |<str2>] ...{Mode 8}{TextAttr OFF} 2 [TOP] [SHADE] [STORE]{Mode 8}{TextAttr OFF} 2 [< 2 Set A 34 2 Random A 2 Print " 2 If A<7 2 End 2 CS/Z, 2 <y:num>{Mode 8}{TextAttr OFF} 2 < 2 ( C="y", A<7 ) 2 <y:num> < 2 < 2 ( 2 {Command "name" 4 R } 2 zAPUSK SISTEMY I SOZDANIE AWTOSTARTU@]EJ DEMONSTRACII 2 tREBOWANIQ K TEKSTOWYM FAJLAM 2 rASPREDELENIE RESURSOW 2 oT AWTORA 2 nA^ALXNYE USTANOWKI SISTEMY 2 hARAKTERISTIKI SISTEMY 2 dLQ NA^ALA ON 2 UP 2 TEXTATTR 2 RIGHT 2 PUTPIC 2 MODE 2 LEFT 2 Enter 2 DOWN 2 Command 2 CS/2 2 CS/1 2 CS/0 2 <vstr> 2 <vnum> 2 <var> 2 <str> 2 <num> 2 [TOP] [SHADE] [STORE] 2 SPACE 2 Print 2 Locate 0 0 2 <NOMER 2 /^ERNYJ PO BELOMU/, 2 !p 2 !` 2 <x2:num> <y2:num>{Mode 8}{TextAttr OFF} 2 9 2 [< 2 <x2:num> <y2:num>{Mode 8}{TextAttr OFF} 2 u s p e h o w w r a b o t e ! 2 ) 68 (WTOROJ PARAMETR: 2 ) "TEKST" (KONEC KOMANDY) 2 STROKOWAQ KONSTANTA W KAWY^KAH DLINOJ DO 62 SIMWOLOW, 2 REZ PEREMENNU@; 2 PEREMENNU@; 2 NAPRIMER: 0 654 009543; 2 NAPRIMER: "TEKST" 2 CELAQ ^ISLOWAQ KONSTANTA W DIAPAZONE OT 0 DO 65535), 2 ( 2 T.(3412)76-19-13 2 PO 2 426063, G.iVEWSK, UL.wOSTO^NAQ, D.36, KW.68 2 --------""--------- CS/Z, 2 "PRESENTATION MASTER", " PM-ILLUSTRATOR", " CONVER-COMANDER", " About ""INFORCOM""" 2 ZOWATELEM) 2 7 2 5 2 3 2 hANCIS sERGEJ 2 2 2 2 2 2 2 2 2 1 hread me C 1 haltread C 1 eREAD ME BA 1 demodoc5Cp 1 demodoc4Cp 1 demodoc3Cp 1 demodoc2Cp 1 demodoc1Cp 1 demoBs Cxi 1 demoAs Cxi 1 demo9s Cxi 1 demo8s Cxi" 1 demo7s Cxi* 1 demo6s Cxi 1 demo5s CxiM 1 demo4s Cxi 1 demo3s Cxi$ 1 demo2s Cxi 1 demo1t Cp 1 cCONVER BU(U() 1 autoexecCp 1 ]pmdoc3 C 1 Xpmdoc2 C 1 Xpmdoc1 C 1 Vtlw.txt C 1 Udemodoc6Cp 1 Sdemodoc5Cp 1 Odemodoc4Cp 1 Manual Cp 1 Kdemodoc3Cp 1 Jdemodoc2Cp 1 Idemodoc1Cp 1 IdemoBs Cxi 1 HdemoAs Cxi 1 Gdemo9s Cxi 1 Gdemo8s Cxi" 1 Fdemo7s Cxi* 1 Edemo6s Cxi 1 Edemo5s CxiM 1 Ddemo4s Cxi 1 Cdemo3s Cxi$ 1 Bdemo2s Cxi 1 Ademo1s C 1 @demo1t Cp 1 @demo1p C 1 ?demoi1 P 1 ?demo2i P 1 ?demo1i P 1 =Manual Cp 1 :autoexecCp 1 6PMI 1.0 B 1 5PM 1.0 B 1 4boot B 1 3read me C 1 3altread C 1 0READ ME BA 1 .CONVER BU(U() 1 )pmdoc3 C 1 #pmdoc2 C 1 #pmdoc1 C 1 "tlw.txt C 1 demodoc6Cp